Forum: Sonstige Fragen zu Delphi
Delphi
by GuenterS,
27. Dez 2005
Fkerbers Idee ist gut,
was ich gemeint habe wäre
zeichen := mychar;
gewesen.
Forum: Sonstige Fragen zu Delphi
Delphi
by GuenterS,
27. Dez 2005
Nein, Assign ist für andere Zwecke gedacht, Du kannst/solltest trotzdem AssignFile verwenden.
Wegen dem anderen Problem, mach aus deinem String einen ShortString, er ist ja nicht länger als 255 Zeichen und greif via auf die einzelnen Zeichen zu. das sollte funktionieren.
Forum: Sonstige Fragen zu Delphi
Delphi
by GuenterS,
26. Dez 2005
Du könntest ja auch File of byte bzw. file of char verwenden und deine Variable zeichen zu einem char machen.
Für den Hausgebrauch sollte dieses Verfahren um Dateien zu schreddern ausreichend sein, denk ich. Wirklich pyshikalisch schreddern wie in Presse oder so kann man per Prog eh nicht realisieren.
Forum: Sonstige Fragen zu Delphi
Delphi
by GuenterS,
26. Dez 2005
1.
Du brauchst deinen String nicht in einen PChar verwandeln, da write sehr wohl auch Shortstring und String akzeptiert.
2.
In deiner Procedure "DateiUeberschreiben", schreibst Du "assign(datei,pfad);" Was soll das denn bringen?
Wäre AssignFile(datei, Pfad) nicht zielführender?
3.
In deiner Loeschen Procedure solltest Du bevor due die Ueberschreiben Procedure aufrufst,...