[rod-on]

Привет всем!

Возникла проблема, при работе с чужим окном. Есть в нем меню, до определенного его пункта я добрался, могу послать ему сообщение. Вопрос в том как узнать его caption или Enabled: true/false.
Вот код для получения хендла нужного мне подпункта меню:

Код:

  wnd:=FindWindow(nil, PHCaption);
  cwnd:=GetMenu(wnd);
  imenu:=GetSubMenu(cwnd,2);
  imenu:=GetMenuItemID(imenu,1);

Как быть дальше? Как получить его Кепшен?

спасибо, заранее за советы.

[Karsh]

напримет так:

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
  Buf: array[0..255] of Char;
  imenu: HMENU;
  wnd: HWND;
begin
  wnd:= FindWindow(nil, 'Безымянный - Блокнот');
  if wnd = 0 then exit;
  imenu:= GetMenu(wnd);
  imenu:= GetSubMenu(imenu, 0);
  GetMenuString(imenu, 2, buf, SizeOf(buf), 0);
  ShowMessage(buf);
end;

[rod-on]

Очень спасибо, действительно помогло