Falsche Trennzeichen in Ausgabedatei ?

HBriele · Beiträge: 80

Hi,
trotz Delimiter und QuoteChar Komma und Hochkomma in der Ausgabedatei.

Wer weis Rat !

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

  F := TStringList.Create;
   F.Delimiter := ';';
   F.QuoteChar := '|';
  try
    F.Add(IntToStr(StringGrid1.RowCount));
    F.Add(IntToStr(StringGrid1.ColCount));
   for i := 0 to (StringGrid1.RowCount - 1) do
      F.Add(StringGrid1.Rows[i].DelimitedText);
    F.SaveToFile(datei);
  finally
    F.Free;

Gruß

Narses · Verfasst: Di 01.02.05 21:30

Moin!

Das liegt daran, dass du die Trennzeichen der "falschen" Stringliste setzt. :wink:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

  F := TStringList.Create;  
  try  
     F.Add(IntToStr(StringGrid1.RowCount));  
     F.Add(IntToStr(StringGrid1.ColCount));  
   for i := 0 to (StringGrid1.RowCount - 1) do begin
     StringGrid1.Rows[i].Delimiter := ';';
     StringGrid1.Rows[i].QuoteChar := '|';
     F.Add(StringGrid1.Rows[i].DelimitedText);  
  end;
    F.SaveToFile(datei);  
  finally  
    F.Free;

Das sollte es eigentlich tun (ungetestet).

cu
Narses

HBriele · Beiträge: 80

Danke!

Funktioniert!!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme