Цитата:
Сообщение от Alegun
Сейчас попробовал повторить - и там и там эта иконка выглядит хорошо,
грузил посредством TPicture через Canvas.Draw и SendMessage(hToolTip,
WM_NCPAINT, 0, 0), может код пора показывать, как выводите
|
Так кода нет, стандартный компонент TrayIcon.
Код:
begin
ShowWindow(Application.Handle, SW_HIDE);
Hide;
TrayIcon1.Visible := true;
TrayIcon1.BalloonHint:='test';
TrayIcon1.BalloonFlags:=bfNone;
TrayIcon1.ShowBalloonHint
end;
Еще нужно заметить, что навесное проблема в том, что в вин10 используется большая иконка в балон хинте.
Расчехлять что ли древний код создания иконки