StringGrid Dolu Hücre Sayısı

[G.Arkas]

Merhabalar;

Çoğunuza basit gelcek bir soru olabilir. Gerçektende ilk defa StringGrid kullanıyorum ve çok yabancısıyım bu elemanın. Bayağı araştırmama rağmen bir sonuç alamadım.

Elimde ki liste de 3 kolonum var. 53 tane de satır var. Ancak kolon 2 de ki satır sayısı değişken. Ben kolon 2 deki "dolu olan hücre sayısını" nasıl alabilirim.

Kod: Tümünü seç

StringGrid1.Cols[1].Count

Denedim ama alamadım. Hakikatten çok yabancısıyım bu componentin.

İyi çalışmalar...

[mrmarman]

Basit düşünüp saydırıcan...

Kod: Tümünü seç

Function HucreSay( StringGrid:TStringGrid; iSutun: Integer ): Integer;
Var
  i : Integer;
begin
  Result := 0;
  for i := 1 to StringGrid.RowCount - 1
    do if StringGrid.Cells[iSutun, i] <> ''
      then Inc(Result);
end;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  ShowMessageFmt('2 nolu Sütun = %d adet hücre doludur...', [ HucreSay( StringGrid1, 2 ) ]);
end;

[G.Arkas]

Abi cok sagol mahcup oluyoruz sanada