Mist, das ist jetzt aber Peinlich. Ein Problem haben, und eine falsche Stelle zu zitieren.
Ein OnClick-Event habe benutze ich nicht. Momentan bearbeite ich das Event mit OnSelectionChange.
Delphi-Quellcode:
procedure TProjekt.LstBxAktivSelectionChange(Sender: TObject; User: boolean);
begin
SQLQuery1.SQL.Text:='select k.ku_id from kunde as k, boote as b where concat(b.name, " - ", k.name) = "'+LstBxAktiv.Items[LstBxAktiv.ItemIndex]+'" and aktiv = true';
SQLQuery1.Open;
gKuId := SQLQuery1.Fields[0].AsInteger;
SQLQuery1.Close;
BtDetail.Enabled:=true;
end;