home *** CD-ROM | disk | FTP | other *** search
- Declare Function GetModuleFileName Lib "kernel" (ByVal hModule%, ByVal FileName$, ByVal FileNameSize%) As Integer
- Declare Function GetModuleUsage Lib "kernel" (ByVal hModule%) As Integer
- Declare Function GetClassWord Lib "user" (ByVal hWnd%, ByVal nIndex%) As Integer
- Declare Function GetWindow Lib "user" (ByVal hWnd%, ByVal wCmd%) As Integer
- Declare Function GetParent Lib "User" (ByVal hWnd%) As Integer
- Declare Function GetWindowText Lib "User" (ByVal hWnd%, ByVal WindowText$, ByVal WindowTextLength%) As Integer
- Declare Function GetWindowTextLength Lib "user" (ByVal hWnd%) As Integer
- Declare Sub SetWindowText Lib "user" (ByVal hWnd%, ByVal WindowText$)
- Declare Function SetActiveWindow Lib "user" (ByVal hWnd%) As Integer
-
- Global Const GCW_HMODULE = (-16)
- Global Const GW_OWNER = 4
- Global Const GW_HWNDNEXT = 2
- Global Const GW_HWNDFIRST = 0
-
-