SQL Abfrage einer Variablen zuweisen

[Eggimaa]

Naja..
immer noch krasser anfänger..
ich hab da mal wieder ne dumme frage..

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var
 test: string;

begin
 test := Edit1.Text;
With Query1 Do
Begin
  SQL.Text :=
    'SELECT *' + #10 +
    'FROM   PLZCH' + #10 +
    'WHERE  PLZ = :i_UserIDvar';
  // Parse Statement um Variablen zu erkennen
  Prepared := True;
  // Parameterzuweisung
    ParamByName('i_UserIDvar').Value := test;

  // Ausführen
  Open;
End;

Das schlaue zeugs da oben hab ich aus eurem wirklich absolut genialen Forum entnommen..
Die DB enthält nix anderes als PLZ und Orte.¨
Über Edit1 wird die PLZ angegeben.. und
in Edit2 soll der dazugehörige Ort angezeigt werden..

Kann mir jemand sagen wie ich das schaffe?

[alcaeus]

So müsste es ungefähr klappen:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
test := Edit1.Text;
With Query1 Do
Begin
  SQL.Text :=
    'SELECT *' + #10 +
    'FROM   PLZCH' + #10 +
    'WHERE  PLZ = :i_UserIDvar';
  // Parse Statement um Variablen zu erkennen
  Prepared := True;
  // Parameterzuweisung
  ParamByName('i_UserIDvar').Value := Edit1.Text;
  // Ausführen
  Open;
  Edit2.Text := FieldByName('Ort').AsString;
  Close;
end;

Greetz
alcaeus

[Eggimaa]

Super..
Danke für die schnelle Antwort..
Es klappt..