Ver Mensaje Individual
  #2  
Antiguo 23-10-2014
Avatar de Héctor Randolph
[Héctor Randolph] Héctor Randolph is offline
Miembro Premium
 
Registrado: dic 2004
Posts: 882
Reputación: 20
Héctor Randolph Va por buen camino
Hola GerTorresM

El problema es que destruyes la instancia del hilo justo de después de que comienza la ejecución.

Lo mejor es crearlo, ejecutarlo y dejar que el mismo hilo se libere de memoria al terminar su trabajo.

Para esto existe la propiedad FreeOnTerminate

Código Delphi [-]
procedure TFAuditoria.BitBtn1Click(Sender: TObject);
Var PruebaXLS : TExportarXLS_MultiHilo;
begin

    PruebaXLS := TExportarXLS_MultiHilo.create('c:\Datos\test.ppp',Self.SGDatos);
    PruebaXLS.FreeOnTerminate:=True;
    PruebaXLS.Resume;

end;

Saludos
Responder Con Cita