TDBGrid die Zeilenzahl abfragen?

[smart]

Wie kann man bei einem TDBGrid die Zeilenzahl abfragen?

[grayfox]

hallo heike!

am einfachsten löst du dein problem, in dem du die datensätze des dem DBGrid dahinterliegenden datensets zählst

mfg, stefan

[marabu]

Hallo Heike,

vielleicht meinst du das hier?

Delphi-Quellcode:

type
  TSmart = class(TDBGrid);

procedure TDemoForm.ShowButtonClick(Sender: TObject);
begin
  ShowMessage(Format('%d rows fully visible', [TSmart(DBGrid).VisibleRowCount]));
end;

Grüße vom marabu

[smart]

@marabu, vielen Dank. Nein, ich möchte nur abfragen wieviel Zeilen ein TDBGrid oder wieviel Daten ein Feld hat. (auch wenn sie nicht sichtbar sind).

[marabu]

Dann hat dir grayfox die richtige Antwort gegeben - mit anderen Worten:

Delphi-Quellcode:

var
  iRows: integer;
begin
  iRows := DBGrid.DataSource.DataSet.RecordCount;
end;

marabu

PS: hoffentlich arbeitest du nicht mit OnFiltered ...

[smart]

@marabu, danke! ich bin nicht auf .RecordCount gekommen.

[MagicAndre1981]

Zitat von smart:

ich bin nicht auf .RecordCount gekommen.

RecordCount ist aber so eine Sache. Bei Desktop-Datenbanken und bei nutzung der BDE funktioniert die Funktion immer. Bei dem FireBird mit den IBX-Komponenten werden mit RecordCount nur die Datensätze gezählt, die schon gefetcht, also vom Server geladen wurden (sollte bei allen anderen Kompos für verschiedene SQL-Servertypen auch so sein).

André

[marabu]

Hi André,

Zitat von MagicAndre1981:

RecordCount ist aber so eine Sache.

guter Hinweis.

Bei SQL-Servern führt der sichere Weg über die Eigenschaft RowsAffected - wenn vorhanden. Generell kommt man nicht umhin die Dokumentation zu lesen. ADO liefert laut Online-Hilfe das Ergebnis in RecordCount und RowsAffected ...

Freundliche Grüße vom marabu