...вот что я сделал
Код:
var
h, z : hwnd;
findmenu: hmenu;
id:integer;
begin
h:= findwindows('TForm4', nil);
z:= findwindowsex(h, 0, 'MacromediaFlashPlayerActiveX', nil);
if findwindowsex(h, 0, 'MacromediaFlashPlayerActiveX', nil) <> 0 then
begin
windows.setforegroundwindow(h);
findmenu:= getmenu(z);
id:= getmenuitemcount(findmenu); // -1
...
...
...
end;
дело в том что ID получает -1 значит оно не видит меню компонента MacromediaFlashPlayerActiveX...или я что то не так делаю??