Acessando Membros Protegidos de um Objeto

  Normalmente, você não 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 mudança 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 código como esse:

THackControl(MyEdit).Color := clBlack;