Zitat von
Smokey:
Ich habe bisher weder mit DBLookupCombo gearbeitet noch mit DateTimePicker aber mal generell:
Wenn du in einen String irgendwas einbinden willst, was erst zur Laufzeit bekannt ist (Variable, Text aus Combobox usw.) dann so :
sSQL := 'SELECT * FROM myTable where myFeld = ' + textField1.Text + 'AND myField2 = ' + QuotedString(wasweissich.text)
sSql ist dabei ne String Variable. Du müsstest quasi nur textField1.text und wasweissich.text durch die Werte deiner beiden Controls ersetzen.
Oder hab ich dein Problem missverstanden??
Danke,
du hast das Problem richtig erkannt.
Dein Programmcode sieht auch gut aus, hab das Beispielprogramm mal so verändert, dass die Daten aus normalen Edit Feldern abgegriffen werden.
Hab dann sSQL als String deklariert, schaut nun so aus:
Delphi-Quellcode:
var
sSQL: String;
procedure TForm1.Button1Click(Sender: TObject);
begin
Query2.Close;
Query2.SQL.Clear;
sSQL := 'SELECT * FROM "t:eDienstreisebuch\mainDBalt.dbf" where dienst_pkw =' + PKW.Text + 'AND datum = ' + Datum2.text + ';
Query2.Active:=True;
end;
Nun mag Delphi aber nicht compilieren, ich bekomme immer die Aussage:
Zitat:
[Fehler] Unit1.pas(46): Nicht abgeschlossener String
[Fehler] Unit1.pas(47): Operator oder Semikolon fehlt
...