Laufendes Programm sich selbst verschieben/ kopieren

[Elko]

Also erst mal vielen Dank für eure Antworten!
Ich habe eure Varianten mal ausprobiert: Sowohl die von Snow, als auch die von FAlter funktionieren einwandfrei. (Ich finde die Variante von snow irgendwie kompliziert, OK, es könnte daran liegen, dass ich noch nie mit Streams gearbeitet habe )

Übrigens: Ich habs mal durch Ausgabe mit einem Label ausprobiert, und dabei ist rausgekommen, dass
ParamStr(0) den gesamten Pfad mit Dateiname ausgibt.

das:
ExtractFilePath(ParamStr(0))+'Project1.exe' kommt also auf selbe raus

Hm, da gibts schon wieder ein Problem (diesmal mit dem Abspielen von Midi-Sequenzen (also zB. "town.mid" im Ordner "WINDOWS\Media") mit dem Delphi-Mediaplayer. Dazu mache ich aber lieber ein anderes Thema auf

Viele Grüße, Elko