Speichern von Array in .csv

Den Umgang mit den File-FB's (TcSystem.lib, Ordner FILE ACCESS) setze ich mal voraus, ansonsten -> InfoSys.
Eine Datei mit nMode:=FOPEN_MODEWRITE OR FOPEN_MODETEXT als Textdatei mit der Endung .csv öffnen, schreiben dann mit einem FB_FilePuts, und zwar etwa so:
Code:
 (* 1) Zu schreibenden String leer intialisieren *)
MyFilePuts.sLine:='';  

(* 2) Einen INT-Wert als String anhängen *)
MyFilePuts.sLine:=CONCAT(MyFilePuts.sLine,INT_TO_STRING(MyArray[Index]);   

(* 3a) Semikolon als Trennzeichen anhängen, falls mehrere Werte in eine Zeile geschrieben werden sollen, anschliessend zurück zu 2) *)
MyFilePuts.sLine:=CONCAT(MyFilePuts.sLine,';')   

(* 3b) oder Zeilenende anhängen *)
MyFilePuts.sLine:=CONCAT(MyFilePuts.sLine,'$0A')   

(* und weg damit (bExecute:=True) *)
 
Zurück
Oben