Вниз
Скачать: CL | DM;

icons   Найти похожие ветки 

← →
alexey1   (2002-02-13 04:09) [0]

Привет всем!
Как взять иконки всех запущенных в данный момент приложений. Спасибо.


← →
tretmike   (2002-02-15 12:01) [1]

Могу подсказать, как я беру иконку по хендлу окна:
Icon:= 0;
// Сперва попробуем получить иконку окна
if (Icon = 0) then
Icon:= SendMessage(FOwner.WindowHandler.Wnd, WM_GETICON, ICON_SMALL, 0);
// Если не получилось получить маленькую иконку, то возьмем большую
if (Icon = 0) then
Icon:= SendMessage(FOwner.WindowHandler.Wnd, WM_GETICON, ICON_BIG, 0);
// Если не получилось у окна, то возьмем у класса окна
if (Icon = 0) then
Icon:= GetClassLong(FOwner.WindowHandler.Wnd, GCL_HICONSM);
// if (Icon = 0) then
// Trace("Icon. GetClassLong. GCL_HICONSM: HWND: " + IntToStr(FOwner.Wnd) + "; Error = (" + IntToStr(GetLastError) + ") " + SysErrorMessage(GetLastError));
if (Icon = 0) then
Icon:= GetClassLong(FOwner.WindowHandler.Wnd, GCL_HICON);


// Если стиль у окна - Dialog, то у него нет иконки
// В этом случае возьмем стандатрную
if (Icon = 0) then
Icon:= LoadIcon(0, IDI_WINLOGO);

2. По поводу списка приложений. Попробуй пройтись по списку окон верхнего уровня.

С уважением, Михаил.



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

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



Память: 0.45 MB
Время: 0.007 c
1-57774
lipskiy
2002-04-03 00:35
2002.04.18
TThread: как вызвать его метод из основного потока и не ждать его


1-57709
mike.dld
2002-04-06 00:22
2002.04.18
Delphi4 vs Delphi6


3-57649
Дмитрий_Ч
2002-03-28 13:14
2002.04.18
Ну скажмите наконец!!!!


1-57745
Ptr
2002-04-05 12:59
2002.04.18
TreeView.selected ?


1-57697
Shrek
2002-04-07 18:01
2002.04.18
Как прочитать открытый txt - файл другой программы.




   Наверх