Hola,
No se que estoy haciendo mal
eh seguido las instrucciones y me esta mostrando un error EOleError....'Variant does not reference an automation object'... el codigo que tengo es el siguiente:
Código Delphi
[-]procedure TFrmFinalizacionMontaje.RBFirmaMontadorClick(Sender: TObject);
var diferencia:TDateTime;
begin
if (userw<>'J704') or (userw<>'M800') or (userw<>'P705')or (userw<>'SYSDBA') then
begin
Dmsip2.TblFormatoFinalizacion.Edit;
Dmsip2.TblFormatoFinalizacion['FIRMAMONTAJES']:='X';
Dmsip2.TblFormatoFinalizacion['USUARIOMONTAJES']:=userw;
DBEUsuarioMontajes.Text:=userw;
DBEFechaMontador.Text:=DateTimeToStr(now);
EHoraMontajes.Text:=copy(DBEFechaMontador.Text,12,13);
Dmsip2.TblFormatoFinalizacion.Post;
diferencia:=DmSip2.TblFormatoFinalizacion['FECHAMONTAJES'].AsDateTime -
DmSip2.TblFormatoFinalizacion['HORAINICIO'].AsDateTime;
end
Ayuda!