Guten Abend,
nein nein, keine Fehlermeldung.
Im Kopf klappt es nicht.
Ich mach nochmal gaaaaaanz langsam :
In meiner Anwendung gibt es unter anderem ein PageControl mit 3 Seiten.
Sagen wir mal P1, P2, P3.
Auf jeder Seite befindet sich ein DBGrid und soll von einer einzigen Datenmenge über dieselbe DataSource jeweils
ein anderes Filterkriterium darstellen.
Für P1 sieht das so aus und klappt :
Code:
procedure TForm1.Dbf2BestandFilterRecord(DataSet: TDataSet; var Accept: Boolean);
begin
Accept := (Dbf2Bestand.FieldByName('SCHUBLADE').AsString = 'ALLE') or (Dbf2Bestand.FieldByName('SCHUBLADE').AsString = 'BE');
end;
Für P2 muss das so aussehen :
Code:
Accept := Dbf2Bestand.FieldByName('SCHUBLADE').AsString = 'BE';
Für P3 muss es so aussehen :
Code:
Accept := Dbf2Bestand.FieldByName('SCHUBLADE').AsString = 'RAUS';
Wie krieg ich das alles in einen Topf ???
Danke fürs nachdenken.............