Tengo un procedimiento al cual le envío dos parámetros, con estos se procesa con un ciclo, estos toman bastante tiempo para culminarse, por lo tanto me bloquea la pantalla, según he leído la solución podría ser hacer un hilo que ejecute esa función, pero la duda es ¿como enviarle a la función del hilo los parametros?, agradezco sus respuestas.
Código:
type
Tinserts = class(TThread)
private
i: Integer;
{ Private declarations }
protected
procedure Actualiza_pgb;
procedure Execute; override;
end;
/**********************************/
la funcion del hilo
procedure Tinserts.Execute;
var
li:Integer;
cad:String;
begin
while not do
begin
end;
/***********************************/
la idea es Tinserts.Execute, reciba dos parametros.