Hallo shmia,
ich finde bei der Komponente TDBGrid nur das Event 'OnTitleClick'. Demnach müsste das also lauten:
Delphi-Quellcode:
procedure OnTitleClick(Column: TColumn); dynamic;
...
TMyDBGrid = class(TDBGrid)
protected // TitleClick soll auch weiterhin protected bleiben
procedure OnTitleClick(Column: TColumn); override;
end;
procedure TMyDBGrid.OnTitleClick(Column: TColumn);
begin
// hier mache ich mein eigenes Ding
....
// und rufe dann das Standardverhalten auf
inherited;
end;
Oder?