Page 2 of 2

Re: want to do some basic things with api

Posted: Sun Oct 17, 2010 12:29 am
by utopiomania
1) how do i click a button id automated?
This is from an answer from RASHAD in another post. This example clicks a menu item
to open it.

Code: Select all

OpenWindow(0,0,0,320,240,"void",#PB_Window_SystemMenu | #PB_Window_ScreenCentered)

CreateMenu(0, WindowID(0))
MenuTitle("Project")
MenuItem(1, "Open"   +Chr(9)+"Ctrl+O")
MenuItem(2, "Save"   +Chr(9)+"Ctrl+S")
MenuItem(3, "Save as"+Chr(9)+"Ctrl+A")
MenuItem(4, "Close"  +Chr(9)+"Ctrl+C")

;GetCursorPos_(cp.POINT)
GetMenuItemRect_(WindowID(0),GetMenu_(WindowID(0)),0,r.RECT)    ;0 = First Title
SetCursorPos_((r\left+5),(r\top+5))
mouse_event_(#MOUSEEVENTF_LEFTDOWN,0,0,0,0)
mouse_event_(#MOUSEEVENTF_LEFTUP,0,0,0,0)
;SetCursorPos_(cp\x,cp\y)

Repeat
   EventID = WaitWindowEvent()
   
   If EventID = #PB_Event_Menu And EventMenu() = 1
      OpenFileRequester("","","*.*",0)
   EndIf
Until EventID = #PB_Event_CloseWindow