Seite 1 von 2
datei in exe
Verfasst: 10.08.2005 01:38
von sen-me
hi
weis einer wie ich das icon der exe und noch ne .dat datei in das programm "rein" tuhen kann?
Verfasst: 10.08.2005 06:43
von Blackskyliner
de .dat wie jede andere:
Code: Alles auswählen
Procedure ReadCatalog(Filename$)
If ReadFile(0, Filename$)
If ReadString() = "Catalog"
For k=0 To 0
Language$(k) = ReadString()
Next
EndIf
CloseFile(0)
EndIf
EndProcedure
würd ich meinen
und das icon
da könnteste dir z.b. ne rc schreiben die in etwa so aussieht:
LANGUAGE 0x0, 0x0
1 MANIFEST xp.res
1 Icon "C:\\PureBasic\\MesExemples\\PlayMP3\\PlayMP3.ico"
und dann machste des über Projekteinstellungen in die Ressourcen dateien mit rein.
Verfasst: 10.08.2005 06:48
von MVXA
Wieso so kompliziert mit Resource. Wenn es das Icon für das Programm
selbst sein soll, dann kann man doch ganz einfach die Option in den Projekt
Optionen einstellen.
Verfasst: 10.08.2005 06:51
von Blackskyliner
joar ^.^ das ist dann die unkompliziertere variante
Verfasst: 10.08.2005 11:39
von Christi
ich würde sone dat-datei so einbinden.:
Code: Alles auswählen
Debug PeekL(?datei)
End
datei:
IncludeBinary "datei.dat"
Verfasst: 10.08.2005 12:50
von sen-me
dann muss sie aber immernoch dabeiliegen (ich will das man nur die exe hat)
Verfasst: 10.08.2005 12:53
von Green Snake
jo, mit dem befehl includebinary wird die datei in die exe gepackt, und muss nicht noch mitgeiefert werden
Verfasst: 10.08.2005 14:25
von sen-me
und wenn die data,dat angelegt wird vom programm?
Code: Alles auswählen
If FileSize("data.dat")=-1
CreateFile(0,"data.dat")
CloseFile(0)
EndIf
z.b. ?
dann bringt er doch den fehler das er sie nicht findet die datei (logisch, sie ist ja noch nicht da)
Verfasst: 10.08.2005 14:30
von DarkDragon
Dann brauchst du die Memory Befehle
. Oder nutze Nacasi, mit dem gehts auch ohne.
Verfasst: 10.08.2005 18:38
von sen-me
ich will ganz einfach das:
ein programm indem die icon datei drin ist
die data.dat ist ne datei die eingaben von dem programm speichert (um sie beim nechsten aufruf wieder anzuzeigen)