Datei in .exe einbindet und beim Ausführen abspeichern?

[ChrisBa]

Hallo
ich suche einen code mit dem ich eine Datei(bsp. 123.txt) in meine .exe einbinden lässt und beim ausführen der .exe auf C: speichert.
leider find ich den code nicht und hoffe auf eure hilfe

Benutzte Purebasic 3.94

[Kiffi]

> ich suche einen code mit dem ich eine Datei(bsp. 123.txt) in meine .exe
> einbinden lässt und beim ausführen der .exe auf C: speichert.

mit IncludeBinary kannst Du die Datei zur Kompilierzeit in Deine Exe
einbinden. Mit PeekS kannst Du den eingebundenen Text ermitteln und in
eine Datei schreiben:

Code: Alles auswählen

FF = CreateFile(#PB_Any, "PfadUndNameDerZuErstellendenDatei")

If FF
  WriteString(FF, PeekS(?MeinText))
  CloseFile(FF)
Else
  ; Datei konnte nicht erstellt werden
EndIf

End

DataSection

MeinText:
IncludeBinary "c:\test.txt"
Data.b 0

EndDataSection

> Benutzte Purebasic 3.94

mittlerweile gibt's PB schon in der Version 4

Grüße ... Kiffi

[ChrisBa]

ja include geht aber wie kann ich nochmal die datei in einen anderen ordner speichern?????
und versteh übrigens nicht mit ?text usw.
kannst du das so aufschreiben das ich z.b:die datei C:\test.txt in die exe haben will und sie dann in C:\1\test.exe gespeichert wird?
danke

[Kiffi]

> ja include geht aber wie kann ich nochmal die datei in einen anderen
> ordner speichern?????

Mein Code beinhaltet alles, was Du für Deine Aufgabenstellung benötigst.
Nimm Dir bitte mal ein paar Minuten Zeit, lese ihn Dir durch (mit parallelem
Lesen in der Hilfe-Datei von PB) und versuche, ihn zu verstehen.

Grüße ... Kiffi

P.S.: Ein Fragezeichen reicht. Es müssen nicht gleich 5 sein.

// Edit:

ich habe gerade gesehen, dass Du schon einmal zu dieser Thematik eine
Antwort bekommen hast: http://www.purebasic.fr/german/viewtopic.php?p=107334

[ChrisBa]

ja für die version 4.
ich benutzt aber jetzt die 3.94 da mein code schon mit der 3.94er geschrieben wurde ich ich den ganzen code nicht neu schreiben will

ok dein code scheint glaub richtig zu sein aber wenn ich ihn ausführe kommt
bei writestring() incorrect number of parameters

[ChrisBa]

gut hab den fehler selbst gefunden denn bei writestring musste das "FF" gelöscht werden
dankeschön