Navigation Menu

[Rontic]

I have had requests from my friends to update my programs to work under Pal 10.
All I need to do is to hold the mic button down release the mic button and send text into the chatroom and IM windows.
Does anybody have any updated code for these?

Thanks

[Rontic]

I really have to thank you guys for all this info.
Now I can finish up the audio checking routine. 🙂

[Rontic]

Okay. This is what I have so far. It’s written in Delphi…

Function AudioEnabled:Boolean;
Var dlggroupchatwindowclass: Longint;
itemcount:longint;
menuitemid:longint;
submenu:longint;
TheMenu:hmenu;
isamenu:longint;
itemstate:longint;
Begin
result:=false;
dlggroupchatwindowclass := FindWindowA(‘dlggroupchat window class’, pchar(Roomname));
themenu:=GetMenu(dlggroupchatwindowclass);
submenu:=GetSubMenu(themenu,3);
if IsMenu(submenu) then
begin
itemcount:=GetMenuItemCount(submenu);
if (itemcount = 15) or (itemcount = 16) then
begin
itemstate:=GetMenuState(submenu,1,MF_BYPOSITION);
if (itemstate and 8 )=8 then
begin
result:=true;
end
else
begin
result:=false;
//menu might not be loaded
end;
end else
begin
result:=false;
//menu not loaded
end;
end else begin
result:=false;
end;
End;

The trouble now is, I have to open up and close the menu in order to refresh the information after the audio is added.

I hope somebody can give me the code numkber for the menu command.
I know it’s simillar to how to open up the admin console, but I don’t know what number to substute for the actions menu.
Then I have to close it after it’s been opened. lol
Unless there’s a better way.

[Rontic]

I’m going to see if the GetMenuState command will be of any help.

[Rontic]

For some reason, my program still sees a button there, even if it’s not visible. lol

[Author]

Posts