Hi,
im using MAC Mojave and Lazarus 2.0RC3. I created a new project with 1 main form, added TTrayIcon and TPopupMenu. My problems are:
1. The TTrayIcon's icon scales too big that I can see only part of the icon. I tried different resolutions from 16x16 to 512x512 but none worked.
2. I already set the hint but it is not shown when mouse hover over the icon
3. Clicking or double-clicking does not do anything as specified by the code. E.g., ShowMessage, popup menu,...
The same code works fine in Linux. I am using all default compiler and target options.
Here is some code:
procedure TfrmMain.FormCreate(Sender: TObject);
begin
trayIcon.Visible := True;
trayIcon.Hint := 'Some hint';
mnExit := TMenuItem.Create(nil);
mnExit.Caption := 'Close';
trayMenu.Items.Add(mnExit);
end;
...
procedure TfrmMain.trayIconClick(Sender: TObject);
begin
trayMenu.PopUp(trayIcon.GetPosition.x, trayIcon.GetPosition.y);
end;