Thema: Delphi ReadLn und WriteLn

Einzelnen Beitrag anzeigen

Mjöllner

Registriert seit: 18. Nov 2006
Ort: Berlin
12 Beiträge
 
Delphi 7 Enterprise
 
#1

ReadLn und WriteLn

  Alt 4. Dez 2006, 19:16
Hallo

ich sitze (immer noch) an einem 3D-Viewer.

Dazu habe ich eine Klasse "TModel" erstellt, die ihre eigenen Punkte in Vektorform speichert und selbst laden kann.

Ich schreibe diese Punkte in eine Textdatei (Typ Textfile) und benutze den Befehl WriteLn.
Beispiel:

Delphi-Quellcode:
var f: Textfile;x,y,z: real;
begin
WriteLn(f,x,y,z);
end;
Auslesen realisiere ich dann über ReadLn mit einer praktisch identischen Prozedur.
Das Problem ist, dass ReadLn Leerzeichen zwischen den Werten fordert, WriteLn aber keine setzt.
Ich kann das Problem zwar umgehen, indem ich folgende Zeile zum speichern benutze:
WriteLn(f,x,' ',y,' ',z) das finde ich aber nicht gerade schön.

Mich interessiert jetzt bloß, warum diese beiden Prozeduren sich nicht genau gegenseitig ergänzen.
Angehängte Dateien
Dateityp: pas umodel_508.pas (6,2 KB, 11x aufgerufen)
Wissen ist Macht, Unwissen Ohnmacht.
  Mit Zitat antworten Zitat