Ver Mensaje Individual
  #1  
Antiguo 22-08-2012
n03l n03l is offline
Miembro
 
Registrado: feb 2007
Posts: 73
Reputación: 18
n03l Va por buen camino
Ejemplo sencillo para ejecutar Hilos en delphi

Buenas. estoy viendo en la web una guia de como crear hilos en delphi, pero estoy demasiado confundido y no allo la manera de echar a andar un ejemplo sencillo de como correr un hilo
tengo el siguiente codigo que estoy viendo en delphi.allimited

Código Delphi [-]
unit Unit2;

interface

uses
  Classes;

type
  THilo = class(TThread)
  Ejecutar: procedure of object;
  private

    { Private declarations }
  protected
    procedure Execute; override;
  end;

  var
  Hilo: THilo; // variable global o pública


implementation

 uses Unit1;

procedure THilo.Execute;
begin
 Ejecutar;
  Terminate;
end;
procedure CrearHilo;
begin
  Hilo.Ejecutar := Form1.ProcesarDatos;//aqui no me lo reconoce y eso que agregue un procedimiento de ese nombre en //Form1
  Hilo.Priority := tpNormal;
  Hilo.Resume;
end;

procedure ProcesarDatos;
begin
  // Este es el procedimiento que ejecutará nuestro hilo
  // Cuidado con hacer procesos críticos aquí
  // El procesamiento paralelo de XP no es el de Linux
  // Se puede ir por las patas abajo...
end;



end.

el problema que tengo esque no se como ejecutar el hilo, desde el Form principal. o si tiene un codigo fuente como para novatos se los agradeceria.
saludos.
Responder Con Cita