Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 01-01-2015
joseprad joseprad is offline
Miembro
 
Registrado: oct 2006
Posts: 36
Poder: 0
joseprad Va por buen camino
Salir de TThread

Hola amigos.
Necesito retomar el control de un programa después de terminar un hilo.
Pongo un esquema del programa
Código Delphi [-]
type
THilo=class(TTHread)
   procedure Execute; override;
   procedure Terminar;


TFormImportar=Class(TForm)
   procedure btoInicarClic(Sender:TObject)
   procedure Final;
   procedure LimpiarPantalla;
end;

var
  frmImportar:TFrmImportar;
  Hilo:THilo;

Implementation

procedure TFrmImportar.btoIniciar(selder:TObject;
begin
   Hilo:=THilo.Create(False);
end;

procedure TfrmImportar.Terminar;
begin
  Application.MessageBox('Finalizado el proceso',
    'Actualitzar', MB_OK + MB_ICONINFORMATION);
  LimpiarPantalla;
end:

procedure TFrmImporter.LimpiarPantalla;
begin
  edit1.text:='';
  edit2.text:='';
  //....
end;

{THilo}

procedure THilo.Execute;
begin
  inherited;
  FreeOnTerminate;
  IniciarProceso;
  Terminar;
end;

procedure THilo.Terminar;
begin
  Terminate;
  frmImportar.Terminar;
end;

procedure THilo.IniciarProceso;
begin
  //....
end;

end;

Al terminar ejecuta el MessageBox, pasa por el procedimiento LimpiarPantalla, pero no me limpia los edits.

Pueden indicarme que es lo que esta mal?.
Muchas gracias
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Problema con librería DLL y TThread frangarrob Varios 3 07-12-2012 20:19:00
FTP y TThread keys Internet 4 01-06-2011 08:12:43
TThread y componentes de red noob OOP 0 18-04-2009 01:25:07
Como Liberar un Tthread???? AGAG4 Varios 3 25-04-2005 22:16:40
Lio con TThread diegofhernando Varios 0 20-01-2004 17:58:35


La franja horaria es GMT +2. Ahora son las 18:19:47.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi