Forum: Object-Pascal / Delphi-Language
Delphi
by perle,
14. Jun 2005
ob es nun hinten dran kommt, oder der Rest überschrieben wird ist im Grunde egal. Dies wird ohnehin nur Einmal gemacht, d.h. der Faktor, dass das Programm immer größer werden würde, ist zu vernachlässigen.
Forum: Object-Pascal / Delphi-Language
Delphi
by perle,
14. Jun 2005
mh ok jetzt gehts....musste aber wohl doch -SizeOf(TDateTime) heißen
Forum: Object-Pascal / Delphi-Language
Delphi
by perle,
14. Jun 2005
danke für die Vorschläge, leider hat es zu keinem brauchbaren Ergebnis geführt...hier noch die genauen Codes :
with TFileStream.Create('Project18.exe',fmOpenWrite) do
begin
Try
Seek(SizeOf(TDateTime), soFromEnd);
Write(Now, SizeOf(TDateTime));
Finally
Forum: Object-Pascal / Delphi-Language
Delphi
by perle,
14. Jun 2005
Hallo, ich möchte gerne ein Datum ans ende meiner Datei hängen aber es will nicht so recht klappen, aber warum nicht?
Dies hier wird von einer zweiten exe ausgeführt :
begin
with TFileStream.Create('test.exe',fmOpenWrite) do
begin
Seek(-SizeOf(TDateTime),soFromEnd);
Write(Now, SizeOf(TDateTime));