SQL - Parameter

[Lemmy]

Hi,

Zitat von Hansa:

Code:

procedure TForm1.Edit1Exit(Sender: TObject);
begin
  KuDS.Active := false;
  KuDS.ParamByName ('KDNR').AsInteger := StrToInt (Edit1.Text);
  KuDS.SelectSQL.Text := 'SELECT * FROM KUNDE WHERE NR = :KDNR';
  KuDS.Active := true;
end;

Oohhh Hansa, was soll das? Wie soll denn in Zeile 2 dem Parameter was zugewiesen werden, wenn Du in Zeile 3 die SQL-Anweisung änderst??? Dreh die beiden Zeilen um und versuchs nochmal. Wenn es nicht gehen sollte (aber nur dann) schiebe zwischen die beiden Zeilen ein

KuDS.Prepare

ein

Grüße
Lemmy