Cita:
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) 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