Ich denke mal, du meinst, wenn die Combo5 gefüllt oder leer ist!?
Du musst in deinem
SQL in der Where-Klausel die Abfrage auf das Datum rauslassen.
Delphi-Quellcode:
var
OldSQL: string;
begin
OldSQL := query6.SQL.Text;
query6.ParamByName('DISP_NR').AsString := ComboBox1.Text;
if Trim(ComboBox5.Text) <> '' then
query6.SQL.Append(' and gueltig_ab = ' + ComboBox5.Text);
query6.Open;
while not query6.eof do
begin
ComboBox2.Items.Add(query6.Fields[0].asstring);
query6.Next;
end;
query6.Close;
query6.SQL.Text := OldSQL;
end;