Filterproblem mit TTable

[marabu]

Hallo Stefan,

vergiss das mit der BDE - da war ich wegen TTable kurz etwas aus der Spur gefahren.

Zu OnFilterRecord() - das könnte etwa so aussehen:

Delphi-Quellcode:

// sMatch := MatchStr('245');

procedure TDemoForm.TableFilterRecord(DataSet: TDataSet; var Accept: Boolean);
begin
  Accept := Match(DataSet['JAHRE'], sMatch);
end;

Statt meiner Funktion Match() kannst du auch die Funktion Like() oder vollwertige regular expressions verwenden - ganz nach deinem Geschmack.

Gute Nacht