(Gast)
n/a Beiträge
|
Re: StringGrid - Minimum, Maximum, Durchschnitt bestimmen
18. Sep 2007, 16:50
Hallo, wenn noch nicht gelöst, dann vielleicht so ...
Delphi-Quellcode:
while not EoF(Datei) do
begin
readln(Datei, Zeile);
if Zeile[1]<>'''' then begin // << zusätzlich
SpalteIndex:=0;
while pos(chr(9), Zeile) <> 0 do
begin
sgMess.Cells[SpalteIndex, ZeileIndex]:=copy(Zeile, 1, pos(chr(9), Zeile)-1);
delete(Zeile, 1, pos(chr(9), Zeile));
inc(SpalteIndex);
end;
sgMess.Cells[SpalteIndex, ZeileIndex]:=Zeile;
inc(ZeileIndex);
//Tabelle automatisch um 1 Zeile erhöhen
sgMess.RowCount:=sgMess.RowCount+1;
end; // << zusätzlich
end;
|
|
Zitat
|