Скачать: CL | DM;

Replace System Tray   Найти похожие ветки 

← →
Khabibulin   (2004-10-29 00:30) [0]

Можно ли заменить системные часы в System Tray"е допустим на свой тект...? Если да, то как?

---

← →
DrPass ©   (2004-10-29 00:34) [1]

Принципиально - можно. С помощью WinSight32 выяснить, какой контрол являет собой эти часы, подобраться к нему с помощью FindWindow/FindWindowEx, и заменить текст с помощью SetWindowText. Но мороки будет...

---

← →
Khabibulin   (2004-10-29 00:37) [2]

а подробнее можно..., или какой нибудь примерчик (ссылку)...

---

← →
GanibalLector ©   (2004-10-29 00:37) [3]

> С помощью WinSight32 выяснить, какой контрол являет собой эти часы, подобраться к нему с помощью FindWindow/FindWindowEx

Shell_TrayWnd->TrayNotifyWnd->TrayClockWClass

> заменить текст с помощью SetWindowText
Не измениться...пробовал когда-то

---

← →
GanibalLector ©   (2004-10-29 00:45) [4]

var qq,qq2:HWND;
st:array[0..255] of char;
begin
qq:=findwindowex(findwindow("Shell_TrayWnd",nil),0,"TrayNotifyWnd",nil);
qq2:=findwindowex(qq,0,"TrayClockWClass",nil);
GetWindowText(qq2,st ,255);
Caption:=st;
SetWindowText(qq2,"kiss");
end;

Самое интересное в том,что если после SetWindowText вызвать GetWindowText ,то он вернет kiss.Хотя визуально останется время...Во как!

---

← →
Khabibulin   (2004-10-29 00:59) [5]

и за это СПАСИБО ...!!!

---

← →
dmitry   (2004-10-29 08:05) [6]

Проще надо быть :) Часы сделай необображаемыми, а вместо них свой текст как обычно в трей в виде иконки

---

← →
[lamer]Barmaglot ©   (2004-10-29 09:10) [7]

FAQ?

http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988620752&n=15

---

← →
[lamer]Barmaglot ©   (2004-10-29 09:10) [8]

FAQ?

http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988620752&n=15

---

← →
TUser ©   (2004-10-29 11:26) [9]

Можно рядом с часами написать свой текст - есть парочка ключей в реестре, один для PM другой - для АМ
Или так
http://www.delphiworld.narod.ru/base/text_to_tray.html

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.021 c