Работа с треем - Общие вопросы Delphi

tortik3399 · 23.05.2013, 06:06

как сделать что бы при сворачивание программы при наведение мышкой на значек в трее
показывало например

Cood:12
Bad:5768
Error:7677

Larboss · 23.05.2013, 06:36

Используйте компонент TTrayIcon

tortik3399 · 23.05.2013, 07:17

Цитата:

Сообщение от Larboss

Используйте компонент TTrayIcon

это я и так знаю

Stilet · 23.05.2013, 07:58

Цитата:

это я и так знаю

Ну так у него должно быть свойство Hint, куда и запихивай эти данные.
Если нет - ищи среди LMD или JVCL компонент TrayBaloonHint или что-то типа того.

tortik3399 · 23.05.2013, 08:44

Цитата:

Сообщение от Stilet

Ну так у него должно быть свойство Hint, куда и запихивай эти данные.
Если нет - ищи среди LMD или JVCL компонент TrayBaloonHint или что-то типа того.

это тоже знаю

а какие вот незнаю

Toxa · 23.05.2013, 10:19

на событие у этого компонента OnMouseMove, вызывай ShowBaloonHint (или как там оно зовется)

procedure TForm1.JvTrayIcon1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
JvTrayIcon1.BalloonHint('sag','asfr ');
end;

только надо обработать чтобы не скакал, пока мыша над иконкой в трее

tortik3399 · 23.05.2013, 12:29

Сворачивание и разворачивание правельное?

procedure TForm1.CoolTrayIcon1Click(Sender: TObject);
begin
CoolTrayIcon1.HideMainForm;
CoolTrayIcon1.IconVisible := not CoolTrayIcon1.IconVisible;
CoolTrayIcon1.ShowMainForm;

Toxa · 23.05.2013, 14:45

а работает?

tortik3399 · 23.05.2013, 21:28

Цитата:

Сообщение от Toxa

а работает?

работает каким то чуда вот думаю не будет ли тупить при работе

tortik3399 · 23.05.2013, 21:28

[QUOTE=Toxa;1232724]на событие у этого компонента OnMouseMove, вызывай ShowBaloonHint (или как там оно зовется)

procedure TForm1.JvTrayIcon1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
JvTrayIcon1.BalloonHint('sag','asfr ');
end;

я не понел что это вообще?

23.05.2013, 06:06	#1
tortik3399 Пользователь Регистрация: 23.05.2013 Сообщений: 11	Работа с треем как сделать что бы при сворачивание программы при наведение мышкой на значек в трее показывало например Cood:12 Bad:5768 Error:7677

23.05.2013, 06:36	#2
Larboss Недо Участник клуба Регистрация: 11.08.2011 Сообщений: 1,394	Используйте компонент TTrayIcon С помощью программирования можно разбогатеть и изменить мир к лучшему (с) Бьерн Страуструп

23.05.2013, 10:19	#6
Toxa Форумчанин Подтвердите свой е-майл Регистрация: 01.12.2006 Сообщений: 514	на событие у этого компонента OnMouseMove, вызывай ShowBaloonHint (или как там оно зовется) procedure TForm1.JvTrayIcon1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin JvTrayIcon1.BalloonHint('sag','asfr '); end; только надо обработать чтобы не скакал, пока мыша над иконкой в трее Пишу на Delphi за еду Последний раз редактировалось Toxa; 23.05.2013 в 10:27. Причина: попробовал код

23.05.2013, 14:45	#8
Toxa Форумчанин Подтвердите свой е-майл Регистрация: 01.12.2006 Сообщений: 514	а работает? Пишу на Delphi за еду

23.05.2013, 12:29	#7
tortik3399 Пользователь Регистрация: 23.05.2013 Сообщений: 11	Сворачивание и разворачивание правельное? procedure TForm1.CoolTrayIcon1Click(Sender: TObject); begin CoolTrayIcon1.HideMainForm; CoolTrayIcon1.IconVisible := not CoolTrayIcon1.IconVisible; CoolTrayIcon1.ShowMainForm;

23.05.2013, 21:28	#10
tortik3399 Пользователь Регистрация: 23.05.2013 Сообщений: 11	[QUOTE=Toxa;1232724]на событие у этого компонента OnMouseMove, вызывай ShowBaloonHint (или как там оно зовется) procedure TForm1.JvTrayIcon1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin JvTrayIcon1.BalloonHint('sag','asfr '); end; я не понел что это вообще?