Ver Mensaje Individual
  #1  
Antiguo 16-09-2010
Paulao Paulao is offline
Miembro
 
Registrado: sep 2003
Ubicación: Rua D 31 Casa 1 - Inhoaíba - Rio de Janeiro - RJ - Brasil
Posts: 637
Reputación: 21
Paulao Va por buen camino
Método tem parametro do tipo sysint

En mi archivo _TLB, yo criei un metodo llamado ExecFuncao. Este metodo tiene 3 paramtros, pero un es del tipo INT, pero quendo me voy salvar mi proyect ele es salvado como SYSINT y no INTEGER(int). Que pasa es que en mi RDM_Principal, viene como SYSINT y no int, esto genera un error y tengo que cambiar para int siempre que voy a compilar o quando hago qualquer cambio en _TLB.
Esta es mi declaracion en archivo tlb
Código Delphi [-]
function ExecFuncao(IDFuncao: SYSINT; Parametros: OleVariant): WideString; dispid 304;
asi estas en mi RDM_Principal. Yo cambie para Integer, pero es SYSINT
Código Delphi [-]
function TRDM_Principal.ExecFuncao(IDFuncao: integer;
  Parametros: OleVariant): WideString;
begin
  Result := LeFuncao(ZConnection1, IDFuncao, Parametros);
end;
Esta es el form de TLB y vea como pongo int y no SYSINT.
[IMG]C:\Projetos\Imagens\Lixo\tlb.jpg[/IMG]
Que tengo que hacer?
Responder Con Cita