Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];




Вниз

Как в Трей добавить текст? 


Tippy   (2001-11-29 20:44) [0]

Как в Трей добавить текст, так что бы можно было изменить шрифт его, цвет текста и цвет под текстом, и по нажатию правой кнопки мыши на нем, открывалась Form1?



Tippy   (2001-12-01 01:02) [1]

Begin
Showmessage( "Неужели никто не знает???");
Showmessage( "Помогите ПЛИЗ!!!");
Showmessage( "Ну хотябы как просто текст в ТРЕЙ добавить?");
Showmessage( "ТРЕЙ "+"(Для полных ламеров :-)"+" это возле часиков (внизу справа!))";
End;
End.



valery_f   (2001-12-01 11:36) [2]

Насколько я знаю, "официально" туда можно вставлять только иконки. Вариант - несколько иконок подряд, которые сложатся в текстовую строку (баловство мысли :))), но там не все так просто.



Olgerd   (2001-12-01 14:26) [3]

>valery_f (01.12.01 11:36)
А вот ты и не прав.
procedure TForm1.Button1Click(Sender: TObject);
var res: DWORD;
begin
SetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_STIMEFORMAT, PChar(" Привет H:mm"));
SendMessageTimeout(FindWindow("Shell_TrayWnd", Nil), WM_SETTINGCHANGE, 0, 0, SMTO_NORMAL, 1000, res);
end;

Ну как?



rsmike   (2001-12-01 14:55) [4]

>Olgerd ©
А вот ты и не прав.
Это ты не в трей текст добавил, а в часы. И уж тем более не получится обрабатывать события от этого текста.



Olgerd   (2001-12-01 19:49) [5]

Я это знаю, но я предложил единственный способ.



Nikolay   (2001-12-01 22:01) [6]

>rsmike
а вот неправ, можно обрабатывать нажатие мыши!
надо только хендл получить!

вот так!



Pat   (2001-12-02 01:22) [7]

Смотри сюда:
http://delphi.mastak.ru/cgi-bin/faq.pl?look=1&id=988620752&n=15



rsmike   (2001-12-02 02:55) [8]

>Nikolay
а вот и сам неправ :)) это будут сообщения от нажатия на часы целиком, а не на текст в трее! да и подобный текст назвать "текстом в tray" можно вееесьма условно.



Nikolay   (2001-12-02 11:53) [9]

2rsmike
нет это конечно. но раз мы заговорили
о том что текст в треет это "немножко"
текст в часах.... :-))

Вот так!(с)



valery_f   (2001-12-04 12:08) [10]

Olgerd> SetLocaleInfo( ...LOCALE_STIMEFORMAT...
Обращаю внимание - эта операция меняет формат текстового представления времени в системе! После этого приходится лезть в Regional settings и восстанавливать его...




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.73 MB
Время: 0.033 c
4-100101          swr                   2001-12-01 18:17  2002.01.31  
BitBlt


3-99920           IronHawk              2001-12-26 10:42  2002.01.31  
Как сохранить


1-100009          IronHawk              2002-01-14 17:06  2002.01.31  
QReport...


4-100122          Котелок               2001-12-05 09:40  2002.01.31  
Подскажите Plss...


3-99863           Andrey196             2001-12-26 15:23  2002.01.31  
Ошибка ненайден индекс, хотя индекс имеется, что делать?? Помогите!!!