Hallo,
ich habe folgenden Code und bekomme immer einen Fehler wenn ich einen Datensatz ändern möchte.
Delphi-Quellcode:
procedure TSchuleintrittKlasse.Button1Click(Sender: TObject);
var
SID : Integer;
KID : Integer;
Qry : TADOQuery;
begin
KID := DBLookupComboBox1.KeyValue;
SID := Stammdaten.QrySchueler.FieldByName('ID').AsInteger;
Qry.SQL.Text := 'UPDATE schueler SET Schuleintritt_Klassse_ID = :KID WHERE id = :SID';
Qry.Parameters.ParamByName('SID').Value := SID;
Qry.Parameters.ParamByName('KID').Value := KID;
Qry.ExecSQL;
end;