Acessando Membros Protegidos de um Objeto

Normalmente, voc no pode acessar membros protegidos de um objeto. Mas Delphi deixa voc acessar membros protegidos se o objeto foi definido na mesma unit. Assim, voc pode definir um objeto derivado e fazer a mudana de tipo onde quer usar o membro protegido. Seria algo assim:

THackControl = class(TCustomEdit)
end;
Depois de definir esta classe, voc pode acessar todos membros protegidos de TCustomEdit, com ebjetos de classe derivadas com um cdigo como esse:

THackControl(MyEdit).Color := clBlack;    

Autor : desconhecido

Voltar