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.{?} - 1 do
// Alle Ergebnisse in ein Memo schreiben Memo1.Lines.Add(Bankleitahl + Bankname)
könnte mir nochmal jmd weiterhelfen?
wenn ich nur
Memo1.Lines.Add(qBankdaten.FieldByName('bankleitzahl').AsString);
zeigt er mir nur eine Bankleitzahl an, aber das will ich ja nicht !