By far my most popular Delphi component. It's a comprehensive component for adding icons to the traybar, allowing you to put a tray icon in your own programs. Lots of features. 8 demos are included.
function DoMinimizeEvents: Boolean; begin Result := False; if FMinimizeToTray then if Assigned(FOnMinimizeToTray) then begin FOnMinimizeToTray(Self); DoMinimizeToTray; Msg.Result := 1; Result := True; end; end;