TurboPL Referenz

Write

Syntax

Write(DateiNr: Integer; Zeichenkette: String): String

Kategorie

Basisfunktion

Erklärung

Bei DateiNr handelt es sich um einen über die Funktion Rewrite oder TAppend festgelegten Datei-Nummer. Die Zeichenkette wird in die zugehörige Textdatei geschrieben. Das Ergebnis ist die Zeichenkette selbst.

Beispiel

In eine Textdatei werden alle Namen der Kunden ohne Zeilenvorschub geschrieben.

vardef T, erster : Integer
IF T := Rewrite("EXTERN.TXT")
       erster := 1
       sub KUNDEN
               if not erster
                       Write(T,", ")
               end
               Write(T,KUNDEN.Name)
               erster:=0
       endsub
       Close(T)
end

Siehe auch

Close, Eot, Read, ReadLn, Reset, Rewrite, TAppend, WriteLn