Anfängerfrage eigene TLabel-Komponente

[scrat1979]

Delphi-Quellcode:

procedure TMyLabel.CMMouseLeave(var Message: TMessage);
begin
 inherited;

// Hier Labelfarbe setzen

 if Assigned(FOnMouseLeave) then
  FOnMouseLeave;
end;