Hallo zusammen,
Kann mit bitte jemand helfen. Wenn ich folgendes mache
procedure TForm1.Button1Click(Sender: TObject);
var
cmd: TAdoCommand;
begin
cmd := TAdoCommand.Create(Self);
with cmd do
begin
try
Connection := ADOCon;
CommandText :=
'INSERT INTO test2 (tst_text) VALUES (:Test) ';
Parameters.ParseSQL(CommandText, True);
Parameters.ParamByName('Test').Value := '';
Execute;
finally
FreeAndNil(cmd);
end;
end;
end;
bekomme ich immer den Fehler:
Ein Parameterobjekt ist nicht richtig konfiguriert. Das selbe passiert auch wenn ich Null zuweisen möchte. Das Problem liegt laut mit darin, dass es Value ein Variant ist und ich ihm den Typ irgendwie nicht zuweise. Nur wie macht man das ?
mfg
Klaus Astner
Kann mit bitte jemand helfen. Wenn ich folgendes mache
procedure TForm1.Button1Click(Sender: TObject);
var
cmd: TAdoCommand;
begin
cmd := TAdoCommand.Create(Self);
with cmd do
begin
try
Connection := ADOCon;
CommandText :=
'INSERT INTO test2 (tst_text) VALUES (:Test) ';
Parameters.ParseSQL(CommandText, True);
Parameters.ParamByName('Test').Value := '';
Execute;
finally
FreeAndNil(cmd);
end;
end;
end;
bekomme ich immer den Fehler:
Ein Parameterobjekt ist nicht richtig konfiguriert. Das selbe passiert auch wenn ich Null zuweisen möchte. Das Problem liegt laut mit darin, dass es Value ein Variant ist und ich ihm den Typ irgendwie nicht zuweise. Nur wie macht man das ?
mfg
Klaus Astner
Comment