Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi zu viele zeilen? (https://www.delphipraxis.net/104159-zu-viele-zeilen.html)

Privateer3000 28. Nov 2007 11:55


zu viele zeilen?
 
Hi folks,

wenn ich folgende Stringlist (uebern) fülle:
Delphi-Quellcode:
for yxc:=0 to zaer do
begin
uebern.AddStrings(elist.Rows[yxc]);
end;
und anschliessend in eine Datei speichere wird der
Inhalt untereinander geschrieben.
elist ein Stringrid, hat 3 Spalten, die möchte ich
aber nebeneinander in eine Datei schreiben.
Wie gelingt das mir??

Phoenix 28. Nov 2007 12:10

Re: zu viele zeilen?
 
Du musst da zwei Schleifen verschachteln:

Pseudocode:
Delphi-Quellcode:
var zeile: String;

for i:= 0 to MaxZeilen -1 do
begin
  zeile := '';
  for j := 0 to MaxSpalten - 1 do
  begin
    if j > 0 then zeile := zeile + ',';
    zeile := zeile + StringGridWert[zeile, spalte];
  end;
  StringList.Add(zeile);
end;

Privateer3000 28. Nov 2007 12:18

Re: zu viele zeilen?
 
Danke phoenix,
also kann man keine ganze Zeile in einen
TString kopieren?

Phoenix 28. Nov 2007 12:19

Re: zu viele zeilen?
 
Ganz ehrlich: Keine Ahnung. Ich hab mich nie wirklich intensiv mit dem Stringgrid beschäftigt. Vielleicht gibt es da ne Methode die sowas kann, aber wenn dann kenne ich die nicht.

marabu 28. Nov 2007 12:21

Re: zu viele zeilen?
 
Hallo,

du kannst es so versuchen:

Delphi-Quellcode:
for yxc := 0 to zaer do
begin
  uebern.Add(elist.Rows[yxc].CommaText);
end;
Grüße vom marabu

Privateer3000 28. Nov 2007 12:30

Re: zu viele zeilen?
 
Danke marabu
genau das wars!
Zwar bleiben die Hochkommas
aber damit werd ich leben müssen


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:48 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz