Главная страница
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.023 c
1-1089795574
din
2004-07-14 12:59
2004.07.25
Подскажите пожалуйста какие нужны библиотеки


1-1089788187
sapsi
2004-07-14 10:56
2004.07.25
Обработка данных, приходящих по сокету в отдельном потоке


14-1088767653
GuAV
2004-07-02 15:27
2004.07.25
Ответ Майкрософт - LOL :)


14-1086681021
Sur
2004-06-08 11:50
2004.07.25
Бил Геитс


3-1088767022
Анонимщик
2004-07-02 15:17
2004.07.25
Исключение при неустановленных драйверах