Firebird con Threads

[[maeyanes]]

Hola...

gluglu, este código:

Código Delphi [-]
procedure THPrueba.Button20111Click(Sender: TObject);
var 
  Hilo: THilo;

begin
  Hilo := THilo.Create(True);
  Hilo.FreeOnTerminate := False;
  Hilo.Resume;
  Timer1.Enabled := True
end;

se puede ejecutar las veces que quieras y no va a dar ningún problema, no se por que sigues diciendo que si. Es más, hasta se podría escribir así:

Código Delphi [-]
begin
  with THilo.Create(True) do
  begin
    FreeOnTerminate := False;
    Resume
  end;
  Timer1.Enabled := True
end;

y seguiría sin dar problemas. Esto claro, en el caso expuesto en el ejemplo. En algún otro caso, donde si necesites hacer referencia a algún hilo en particular, entonces si que se podría usar algún mecanismo para guardar estas referencias.



Saludos...