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

Вниз

как узнать HICON ?   Найти похожие ветки 

 
kalmykovser   (2004-06-12 18:01) [0]

Уважаемые мастера, подскажите пожалуйста как узнать HICON зная
хендел ?

Я делаю так
GetClassLong(GetForegroundWindow,GCL_HICON)
но определяеються значки только у IE и папок :(


 
kalmykovser   (2004-06-12 21:05) [1]

Вот что я ещё накопал
Чтобы определялись значки нужно определять handle у APPLICATION,
а спомощью GetForegroundWindow я определяю хендел активной формы :(
а как его найти ?


 
VMcL ©   (2004-06-13 00:42) [2]

>>kalmykovser  (12.06.04 18:01)

function GetWindowIcon(AWindowHandle: HWND): HICON;
begin
 Result := SendMessage(AWindowHandle, WM_GETICON, ICON_SMALL, 0);
 if Result <> 0 then Exit;

 Result := SendMessage(AWindowHandle, WM_GETICON, ICON_BIG, 0);
 if Result <> 0 then Exit;

 Result := GetClassLong(AWindowHandle, GCL_HICONSM);
 if Result <> 0 then Exit;

 Result := GetClassLong(AWindowHandle, GCL_HICON);
 if Result <> 0 then Exit;

 Result := LoadIcon(0, IDI_WINLOGO);
end;


?


 
kalmykovser   (2004-06-13 09:51) [3]

Спасибо,
считаю что тема закрыта.



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

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

Наверх




Память: 0.47 MB
Время: 0.022 c
6-1085557009
AndrewK
2004-05-26 11:36
2004.07.25
Как послать письмо в Windows кодировке?


1-1089636739
Aleksandr.
2004-07-12 16:52
2004.07.25
Есть ли надежный метод отличить строку OEM от ANSI?


3-1088407512
axx
2004-06-28 11:25
2004.07.25
Приобразование типов в запросе. Синтаксис


14-1089022952
CrazyHacKeRs
2004-07-05 14:22
2004.07.25
Раздача лицензий от MicroOlap до 05.07.2004


14-1089241546
Almaz
2004-07-08 03:05
2004.07.25
IDE среды под QNX 6.x