Einzelnen Beitrag anzeigen

Benutzerbild von joachimd
joachimd

Registriert seit: 17. Feb 2005
Ort: Weitingen
678 Beiträge
 
Delphi 12 Athens
 
#13

AW: Stored Procedure Abfrage ob Eintrag vorhanden

  Alt 1. Mär 2011, 10:16
zuallererst würde ich Parameter verwenden, damit Formatprobleme und SQL injections umgangen werden. Dann muss man das unbekannte Feld der Selektion natürlich auch benamen - oder man greift auf dessen index zu:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
  qBankdaten.SQL.Text := 'SELECT ZMI_Bankdaten(:suchwert) AS BANKDATEN FROM system.iota';
  qBankdaten.ParamByName('suchwert').AsString:=edtSuchwert.Text;
  qBankdaten.Open;
  edtRückgabe.Text := qBankdaten.FieldByName('bankdaten').AsString;
  //oder
  edtRückgabe.Text := qBankdaten.Fields[0].AsString;
end;
Joachim Dürr
Joachim Dürr Softwareengineering
http://www.jd-engineering.de
  Mit Zitat antworten Zitat