Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.01.31;
Скачать: CL | DM;

Вниз

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

 
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 и восстанавливать его...



Страницы: 1 вся ветка

Текущий архив: 2002.01.31;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.012 c
3-99889
KMZ
2001-12-27 13:06
2002.01.31
Как можно конвертировать таблицы с данными в Interbase


4-100107
Chup
2001-12-03 12:21
2002.01.31
CreateProcess


3-99909
Igor_thief
2001-12-28 15:53
2002.01.31
BDE


1-99956
MystiX
2002-01-13 18:02
2002.01.31
Heeelp!!!


14-100045
ESergey
2001-12-07 21:40
2002.01.31
Delphi Developer needed