получить Иконки в MDIChild ах через Messages... [D6, Win95/98, WinME, NT4, Win2k, WinXP]
Dr. Web © (2002-06-07 15:47:00)
Доброго времени суток Дамы и Господа!
сижу я тут копаю компоненту ElegantMDI
и возник у меня вопрос:
как через messages
выловить иконку MDIChild"a?
caption его вылавливает такая феня:
....
InstanceChildWndProc := MakeObjectInstance(ChildWndProc);
OldChildWndProc :=
Pointer(GetWindowLong(Handle,GWL_WNDPROC));
SetWindowLong(Handle, GWL_WNDPROC,
Longint(InstanceChildWndProc));
.....
procedure TChild.ChildWndProc(var Message: TMessage);
begin
Case Message.msg of
WM_GETTEXT:
begin
Message.Result:= CallWindowProc(OldChildWndProc, Handle,
Message.Msg, Message.WParam, Message.LParam);
Button.Caption := Copy(PChar(Message.LParam),1,12);
//PChar(Message.LParam) как раз и выдает caption
end;
end;
А как поймать иконку окна?
Dr. Web (2002-06-08 00:12:00) [1]
Народ, ну что, никто с ВинАПИ не игрался?
:(
Наверх 
ЧАТ |
Орешник |
|
