Moin,
leider habe ich mein anderes Thema frühzeitig geschlossen. Es geht wieder darum, eine Ausgabe zu filtern:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
| PROCEDURE TVNForm.FormShow(Sender: TObject);
BEGIN
WITH QueryMaterialstamm DO
BEGIN
Close();
PARAMbyname('IdentNr').AsInteger := iIdentNummer;
Open();
END;
IF bIssues THEN
DataSourceVerwendung.DataSet := QueryVerwendungIssue
ELSE
DataSourceVerwendung.DataSet := QueryVerwendungVariante;
WITH (DataSourceVerwendung.DataSet AS TQuery) DO
BEGIN
Close();
PARAMbyname('IdentNr').AsString := IntToStr(iIdentNummer);
Open();
END;
END; |
Dabei ist die Variable iIdentnummer übergeben worden, die Variable bIssue belegt mit "Alle Issues anzeigen" = True oder "nur Varianten anzeigen" = False.
Ich möchte aber, dass nachher nur diejenigen datensätze ausgegeben werden, deren Eigenschaft "GUELTIG" = 1 ist.
Reicht der Input hier, um die Fragen zu beantworten?
Schönen Grüß und Danke
Max
