Hallo,
ich beschäftige mich erst seit kurzer Zeit mit der Komponentenentwicklung. Habe mir schon einiges angeschaut, unter anderem das Tutorial von Sakura...
Leider weiß ich nicht wie ich ein Default-Verhalten für das Ereignis 'OnTitleClick' für meine Komponente implementiere. Hier mal der Code:
Delphi-Quellcode:
unit MyDBGrid;
interface
uses
SysUtils, Windows, Messages, Classes, Graphics, Controls,
Forms, Dialogs;
type
TmyDBGrid =
class (TDBGRID)
published
function OnTitleClick: TNotifyEvent;
override;
end;
procedure Register;
implementation
procedure Register;
begin
end;
{
********************************** TmyDBGrid ***********************************
}
{- TmyDBGrid.OnTitleClick }
function TmyDBGrid.OnTitleClick: TNotifyEvent;
begin
showmessage('
OnTitleClick!')
end;
end.
So scheint es nicht zu funktionieren. Wenn ich in meiner Anwendung ein Grid vom Typ 'TmyDBGrid' erzeuge klappt zwar die Darstellung, das Klicken auf die Titelzeile wird aber nicht beachtet...
Weiß jemand Rat?