Aufgaben mit LiveBindings und Delphi-DB's erledigen

[Sir Rufo]

@Harry

Du kennst die Methode TDataSet.OnFilterRecord?

Das kombiniert mit dem Specification Pattern macht es sehr schlank

Delphi-Quellcode:

procedure TWhatever.DataSetOnFilterRecord( Dataset: TDataSet; var Accept: Boolean );
begin
  Accept := CurrentFilter.IsSatisfiedBy( DataSet );
end;

Delphi-Quellcode:

DataSetSpecifications = class
  class function IsInAnyField( aStr: string ): ISpecification<TDataSet>;
  // usw.
end;