gefüllte Zeilen im StringGrid zählen...

[Markus K.]

Hallo alanblack,
ich würde es so machen.

Delphi-Quellcode:

var
 Zeile,Spalte,gefZeilen:Integer;
begin
     gefZeilen:=0;
     with StringGrid1 do
     for Zeile:=0 to RowCount-1
     do for Spalte:=0 to ColCount-1
        do if Cells[Spalte,Zeile]<>''
           then begin
                inc(Z);
                Break;
                end;
     Label1.Caption:='Gefüllte Zeilen: '+IntToStr(gefZeilen);
end;

Tschüß Markus