Hi,
ich würde erstmal meinen das deine sSQL nicht ganz richtig ist:
sSQL := 'SELECT VertragNr, KundenNr, Bezeichnung FROM Vertrag where AbrechPartner =' + DBLookupComboBox1.KeyValue;
oder
sSQL := 'SELECT VertragNr, KundenNr, Bezeichnung FROM Vertrag where AbrechPartner =:a';
und dann den parameter erstzen:
Query.Params.ParamByName('a').Value:=DBLookupComboBox1.KeyValue;
Vielleicht hilft es.
Plautzer