Ver Mensaje Individual
  #1  
Antiguo 16-11-2012
jars jars is offline
Miembro
 
Registrado: mar 2004
Posts: 283
Reputación: 23
jars Va por buen camino
cargar dll en un hilo y ejecutar funcion

Hola amigos.
Tengo un programa que utiliza una dll que algunas veces demora bastante en la ejecucion de una funcion.
La cargo cuando se inicia la aplicacion en un hilo con el componente TJvThread de Jedi con el siguinte codigo:

Código Delphi [-]
//variables publicas, se usan desde otra unit   
lACD : IACDClient;   
hAsClient: LongWord;  

procedure TFormMain.thrASClientExecute(Sender: TObject; Params: Pointer); 
begin   
  try     
    hAsClient := LoadLibraryASClient;     
    try       
      ASClientStartUp(AS_ACTIVATE_ACD_SERVICE);       
      lACD := NewACDClient;       
      trace('thrASClient StartUp OK');     
    except       
      on E: Exception do trace('@E ASClientStartUp '+ E.Message);     
    end;   
  except     
    on E: Exception do trace('@E LoadLibraryASClient '+ E.Message);   
  end; 
end;

El tema con esto es que ante un evento del hilo principal tengo que ejecutar una funcion de la dll.
Código Delphi [-]
  lRes:= lACD.WRSetupCallBack(cbtable, cbrecord, cbdatetime, cbphone);

Soy conciente que al ejecutarse desde el hilo principal, se va a seguir demorando mi programa.
Como tendria que hacer para que la funcion WRSetupCallBack se ejecute en el hilo, como le aviso y le paso los parametros?

Espero haberme explicado.
Saludos

Última edición por jars fecha: 16-11-2012 a las 21:05:46.
Responder Con Cita