irgendwie hab ich grade einen Hänger
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
sZeichenLoeschen: String;
iDatensätze: Integer;
begin
qBankdaten.sql.text:='select * from bankdaten where contains(bankname,:such1) or cast(bankleitzahl as sql_char) like :such2';
qBankdaten.parambyname('such1').asstring:=edtSuchwert.Text;
qBankdaten.parambyname('such2').asstring:=edtSuchwert.Text;
qBankdaten.open;
for iDatensätze := 0 to qBankdaten.FieldCount - 1 do
begin
Memo1.Lines.Add(qBankdaten.FieldByName('Bankleitzahl').AsString + '= ' + qBankdaten.FieldByName('Bankname').AsString);
qBankdaten.Next;
end;
end;
Er trägt mir irgendwie immer drei Bankleitzahlen ein + den zugehörigen Banknamen, aber es müssen etliche mehr sein, was mach ich denn noch falsch?
Und wenn ich anstatt eines Banknamens eine PLZ eintrage (und diese ist ja eindeutig) krieg ich trotzdem 3 mal die selbe BLZ + Banknamen angezeigt.