Einzelnen Beitrag anzeigen

Benutzerbild von Stevie
Stevie

Registriert seit: 12. Aug 2003
Ort: Soest
4.016 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#6

Re: Parameter leer überprüfen

  Alt 12. Okt 2004, 07:37
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;
Stefan
“Simplicity, carried to the extreme, becomes elegance.” Jon Franklin

Delphi Sorcery - DSharp - Spring4D - TestInsight
  Mit Zitat antworten Zitat