dbgrid (XML-Datei) Datensätze zählen 'text' in einer Spalte

[Stevie]

Hi Heino,

Delphi-Quellcode:

with ClientDataSet1 do
begin
  First;
  Count := 0;
  while not Eof do
  begin
    if FieldByName('Farbe').AsString = 'rot' then
      Inc(Count);
    Next;
  end;
end;

Du kannst das auch über den Filter machen:

Delphi-Quellcode:

with ClientDataSet1 do
begin
  Filtered := True;
  Filter := 'Farbe = ''rot''';
  Count := ClientDataSet1.RecordCount;
end;