Agregarle parametros al metodo Execute de TThread

[[Lepe]]

Empezado por eduarcol

la duda sigue porq sengun entendi si lo coloco virtual pierdo la herencia del ancestro

No entiendo muy bien.

Si ahora vas a crear otra clase que hereda de TCompararMd5, sugiero que hagas virtual el ExecuteWithIndex, el Execute lo dejas tal cual, es decir:

Código Delphi [-]
TCompararMd5V2 = class(TCompararMd5)    // versión 2  
protected
   procedure Execute; override;
end;

Cuando ahora llames a Execute, se ejecutarán en este orden:
TCompararMd5V2.Execute que al llamar a inherited ejecutará:
TCompararMd5.Execute que al llamar a inherited ejecutará:
TThread.Execute

Saludos