>*** Author: Cetin Basoz >#define WM_LBUTTONDOWN 0x0201 >#define WM_SYSKEYDOWN 0x0104 >#define WM_SYSKEYUP 0x0105 > >#define VK_MENU 12 >#define VK_DOWN 28 > >LOCAL lnHWND >LOCAL ARRAY arrDLL[1] >ADLLS(arrDLL) >IF ASCAN(arrDLL,'SendMessage',1,-1,1,1+2+4) = 0 > declare integer SendMessage IN WIN32API ; > integer hwnd, integer Msg, integer Wparam, integer lParam >endif >lnHwnd = Thisform.OleDateTime.hWnd >SendMessage(m.lnHwnd,WM_LBUTTONDOWN,0,0) >SendMessage(m.lnHwnd,WM_SYSKEYDOWN,VK_MENU+VK_DOWN,0) >SendMessage(m.lnHwnd,WM_SYSKEYUP,VK_MENU+VK_DOWN,0) >Cetin