Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
22. Nov 2005
Ich muß dir ja auch danken ... schließlich war es ja doch ein Fehler meinerseits.
Und dank dir ist er jetzt behoben und zusätlich weiß ich meine Funktion(en) jetzt auch noch in guten Händen. :angel:
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
18. Nov 2005
OK, das Problem bei TFlushFunc(TFileRec(F).FlushFunc)(F); hab ich beseitigt.
Füge bitte noch die folgende Prüfung mit ein:
If TFileRec(F).FlushFunc <> nil Then TFlushFunc(TFileRec(F).FlushFunc)(F);
Bei Textdateien ist es so, das selbst wenn keine Flush-Funktionalität vorhanden ist, daß dann wenigstens eine Dummy-Funktion (FileNOPProc) angegeben ist, wobei bei den typisierten Dateien nichts...
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
17. Nov 2005
zu "recNum := recNum * TFileRec(F).RecSize;" hab ich oben noch was nachgetragen ^^
Und dieses muß auch (unbedingt) enthalten sein, denn es ist im Original auch drin und meine Funktionen sollen/müssen ja kompatibel zu diesem sein. ;)
Wie ist denn deine Dateivariable (f) definiert?
PS: mach mal bitte das Delphi-Tag um deine Quellcodes ... so läßt es sich ein bissl schwer lesen.
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
17. Nov 2005
OK, der Fehler ist mir zwar noch unbekannt, aber ich werd' mir das nochmal genauer ansehen, allerdings denke ich im Moment noch nicht, daß es an meinen Funktionen liegt.
Kannst du eventuell mal etwas Code aus deinem Programm zur verfügung stellen (notfalls auch per PN), damit ich mir dieses auch nochmal direkt an deinem Beispiel ansehen zu können?
TFlushFunc(TFileRec(F).FlushFunc)(F);...