Überschreiben der Methode 'OnTitleClick'

[mirage228]

Hi,

deklariere die Prozedur mal so

Delphi-Quellcode:

private
  procedure TitleClicked(Sender: TObject);

und schreibe im Konstruktor dann:

Delphi-Quellcode:

constructor TMyDBGrid.Create(AOwner: TComponent);
begin
  inherited;
  OnTitleClick := TitleClicked;
end;

mfG
mirage228