este es el codigo como me esta quedando:
Código Delphi
[-]procedure TfrmAddPel.CargarFoto1Click(Sender: TObject);
var MiRuta: String;
begin
if CargarPoster.Execute then begin
MiRuta := CargarPoster.FileName;
JvImage1.Picture.LoadFromFile(MiRuta);
qryPeliculas.Close;
qryPeliculas.Parameters.ParamByName('Foto').Value := MiRuta;
qryPeliculas.SQL.add('insert into PELICULAS values');
qryPeliculas.SQL.add('PELFOTO = :Foto'); qryPeliculas.Open;
end;
end;
Problema:
Cita:
qryPeliculas.Parameters.ParamByName('Foto').Value := MiRuta;
|
como se trata de componentes ADO no existe la propiedad ParamByName al no poner la propiedad Parameters, AsString no me reconoce por eso puse Value y al cargar la foto me sale un error del parametro impropiado o que falta datos, que puede ser??
error:
Cita:
Parameter object is improperly defined, inconsistent or imcoplete information was provided.
|
saludos,