Einzelnen Beitrag anzeigen

Benutzerbild von H4ndy
H4ndy

Registriert seit: 28. Jun 2003
Ort: Chemnitz
515 Beiträge
 
Delphi XE3 Professional
 
#2

Re: Speichern in einer externen Textdatei

  Alt 6. Dez 2003, 12:51
Also wenn ich dich recht verstehe, dass möchtest du dein
2D-Array in eine Text-Datei speichern.

Ich hab das mit ner StringList und
zwei geschachtelten FOR-Schleifen gemacht:
(Müsste so gehen. Musst aber noch n1 und n2 ersetzen!)
Delphi-Quellcode:
var 2darray: array [1..n1,1..n2] of char;

StrList := NIL;
try
  SetLenght(str,n1);
  StrList := TStringList.Create;
        
  for i:=1 to n1 do begin
    for j:=1 to n2 do begin
      str[j] := 2darray[i,j];
    end;
    StrList.Add(str);
  end;

  StrList.SaveToFile('text.txt');
finally
  StrList.Free;
end;
Manuel
  Mit Zitat antworten Zitat