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

Вниз

Иконка приложения   Найти похожие ветки 

 
YURiQUE ©   (2003-08-02 12:00) [0]

Подскажите плиз, как достать иконку окна (чужого) имея его хэндл.


 
Guerrillero ©   (2003-08-03 01:48) [1]

окна или приложения ?
если второе, то что за хэндл приложения?
если первое,то WM_GETICON


 
jonni ©   (2003-08-03 08:05) [2]

TaskList[i].MainWindow:HWND;<-handle okna
ico:HICON;<-pointer na iconku



ico:= 0;
SendMessageTimeout(TaskList[i].MainWindow, WM_GETICON, ICON_SMALL, 0, SMTO_ABORTIFHUNG, 1000, LongWord(ico));
if (ico = 0) then ico := GetClassLong(TaskList[i].MainWindow, GCL_HICONSM);
if (ico = 0) then SendMessageTimeout(TaskList[i].MainWindow, WM_GETICON, ICON_BIG, 0, SMTO_ABORTIFHUNG, 1000, LongWord(ico));
if (ico = 0) then ico := GetClassLong(TaskList[i].MainWindow, GCL_HICON);
if (ico = 0) then SendMessageTimeout(TaskList[i].MainWindow, WM_QUERYDRAGICON, 0, 0, SMTO_ABORTIFHUNG, 1000, LongWord(ico));
( ico = 0) TaskList[i].MainWindow:HWND;<-handle okna
ico:HICON;<-pointer na iconku



ico:= 0;
SendMessageTimeout(TaskList[i].MainWindow, WM_GETICON, ICON_SMALL, 0, SMTO_ABORTIFHUNG, 1000, LongWord(ico));
if (ico = 0) then ico := GetClassLong(TaskList[i].MainWindow, GCL_HICONSM);
if (ico = 0) then SendMessageTimeout(TaskList[i].MainWindow, WM_GETICON, ICON_BIG, 0, SMTO_ABORTIFHUNG, 1000, LongWord(ico));
if (ico = 0) then ico := GetClassLong(TaskList[i].MainWindow, GCL_HICON);
if (ico = 0) then SendMessageTimeout(TaskList[i].MainWindow, WM_QUERYDRAGICON, 0, 0, SMTO_ABORTIFHUNG, 1000, LongWord(ico));
if (ico = 0) then ico:=LoadIcon(0,IDI_APPLICATION);


 
Dakis ©   (2003-08-03 09:46) [3]

ico:HICON;<-pointer na iconku
Не pointer а hanlde - это разные вещи...



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

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

Наверх




Память: 0.47 MB
Время: 0.021 c
1-27461
Andrey Voznesenskiy
2003-09-27 13:27
2003.10.09
MDi и Child


9-27291
Андрей22
2003-04-07 20:26
2003.10.09
Где можно найти исходники программы


3-27331
_jek
2003-09-20 14:23
2003.10.09
ADO компоненты


14-27646
Настенька
2003-09-22 07:15
2003.10.09
файл с расширением *.dat


14-27699
Layner
2003-09-22 08:31
2003.10.09
Вопрос москвичам, Дорого ли обходится GPRS и как его качество.