Yeni Component`e Olay ekleme sorunu

[jafari1983]

Salamun aleykum mühterem dostlar.

Yeni delphi componenti (bileşeni) olduşdurdum, TEdit`i Anchestor seçib, ondan TAqsEdit oluşdurdum. Yeni formlarda kodları tekrarlamamaq üçün bileşenimin OnEnter olayina Color:=clBlack ilave etmek iseyirem. 2 gündür internetden aradım, bulamadım. Yardım ederseniz sevinerem.

[SimaWB]

TEdit'in DoEnter procedure'ünü override etmen gerekir:

Kod: Tümünü seç

  TAqsEdit= class(TEdit)
  ...
  protected
    procedure DoEnter; override;
  end;
...
procedure TAqsEdit.DoEnter;
begin
  Color := clBlack;
  inherited;
end;

[jafari1983]

Qardaş, çox teşekkür ederim. DoEnter procedurlerin ismini nerden aldın ?
Bunu diğer konroller üçün de etmek isterdim.
Meselçün: KeyPress, KeyDown olayları üçün de bunu yapmaq isterim.

Önceden teşekkürler.

[SimaWB]

TWinControl -> TCustomEdit -> TEdit
DoEnter için TWinControl'e bakmalısın. Dolayısıyla TWinControl'den türetilmiş tüm bileşenler için kullanabilirsin.