Как получить дескриптор иконки чужого окна?!?

← →
LEgO-2 © (2002-09-02 10:56) [0]

Есть иакая проблема.. мне нужно бы получить HICON чужого окна..
Сомо окно,конечно же, найти могу, НО КАК ВЫДЕРНУТЬ ИКОНКУ ИЗ НЕГО???
sendmessage(wnd{:HWND},WM_GETICON,?,?);
Куда приходит дескриптор??

← →
Игорь Шевченко © (2002-09-02 11:11) [1]

В кладовке лежит программа EnumFunctions - она показывает иконки чужих окон

← →
LEgO-2 © (2002-09-02 11:15) [2]

А так сказать не как???
Помогите примером.. ПЛЗ...

← →
Игорь Шевченко © (2002-09-02 11:21) [3]

LEgO-2 © (02.09.02 11:15)

Там исходники - чем не пример ?

← →
Ученик © (2002-09-02 11:23) [4]

procedure TForm1.Button1Click(Sender: TObject);
var
Window : HWnd;
Icon : HIcon;
begin
Window := StrToInt("$" + Edit1.Text);
repeat
Icon := SendMessage(Window, WM_GETICON, ICON_BIG, 0);
if Icon <> 0 then begin
Image1.Picture.Icon.Handle := Icon;
Break
end else
Window := GetParent(Window);
until Window = 0
end;

ща гляну.... сэнькс...
20%осталось скачать...

Всем СПАСИБО за помощь!!!

Как получить дескриптор иконки чужого окна?!? Найти похожие ветки