Muchas gracias por tu respuesta, ya supe cual fue el error, ahorra miduda es al siguiente, me gustaria saber que tanta versatibilidad tiene un hilo para correr en segundo plano un procedimiento que no es propio de el, pro ejemplo.
Código Delphi
[-]
procedure THilo.Execute;
var i : integer;
begin
inherited;
FreeOnTerminate := True;
while not terminated do
begin
Synchronize(MostrarContador);
end;
end;
procedure THilo.MostrarContador;
begin
FrmAuxialiar.MostrarCargando;
end;
procedure TFrmAuxialiar.MostrarCargando;
var
i:integer;
begin
i:=1;
While i>0 do
begin
i:=i+1;
end;
end;
Estoy forzando a un bucle infinito, y quiero ver si se respeta la concurrencia, pero al hacer esto se me traba la pantalla.
Me gustaria saber el por que, y si hay alguna manera que el procedimiento "Mostrarcargando" se pueda correr paralelamente sin definirlo dentro del hilo.
Muchas gracias!!!!!