Im DbGrid Daten geordnen anzeigen?

[Sharky]

Zitat von smart:

Kann man mit DbGrid Daten so anzeigen, dass wenn man z.B. ein A eingibt, alle Daten die mit A anfangen angezeigt werden? Oder wie macht man soetwas?

Hai Heike,

eine möglichkeit wäre die Eigenschaft .Filter des DataSets zu verwenden. Das könnte zum Beispiel so aussehen für das Datenbankfeld name

Delphi-Quellcode:

procedure TForm1.DBGrid2KeyPress(Sender: TObject; var Key: char);
begin
  with (Sender as TDBGrid).DataSource.DataSet do
  begin
    if (Key in ['a'..'z']) then
    begin
      FilterOptions := [foCaseInsensitive];
      Filter := 'name = ' + QuotedStr(Key + '*');
      Filtered := True;
    end;
    if Key = #27 then
    begin
      Filtered := False;
    end;
  end;
end;