Главная страница
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.034 c
1-27560
anonymous
2003-09-29 14:02
2003.10.09
Есть ли что-нить типа StringGrid1.Cells[i,j] для DBGrid1 ?


8-27611
fs_more
2003-06-10 13:08
2003.10.09
Не могу воспроизвести файл с помощью PlaySound()


3-27353
Gloony
2003-09-19 08:44
2003.10.09
Кривые символы в табл. Paradox


1-27580
stranger2003
2003-09-29 12:38
2003.10.09
Listbox и дубликаты


3-27339
Настенька
2003-09-21 13:58
2003.10.09
Словарь !!!