Get Started
The Visual Studio 2008 Shell Preview is now available. To begin developing and testing your own Shell instance, download Visual Studio 2008 Beta 2 and the Visual Studio 2008 SDK August 2007 CTP. The SDK contains everything you need to build packages for the Visual Studio Shell, as well as basic documentation to help you get started. For more information on features, customization points, and how-to resources, read the Shell details page.
#include "FiveWin.ch"
function Main()
local hWnd := FindWindow( 0, "Microsoft Visual Studio" )
DEFINE WINDOW oWnd
EnableWindow( SetParent( hWnd, oWnd:hWnd ), .T. )
EnableWindow( FindWindow( 0, "Start Page - Microsoft Visual Studio (Administrator)" ), .T. )
ACTIVATE WINDOW oWnd
return nil
#include "FiveWin.ch"
#define GW_CHILD 5
#define GW_HWNDNEXT 2
function Main()
local hWnd1 := FindWindow( 0, "Microsoft Visual Studio" ), hWnd2, hCtrl
DEFINE WINDOW oWnd
EnableWindow( SetParent( hWnd1, oWnd:hWnd ), .T. )
EnableWindow( hWnd2 := FindWindow( 0, "Start Page - Microsoft Visual Studio (Administrator)" ), .T. )
hCtrl := GetWindow( hWnd2, GW_CHILD )
while hCtrl != 0
EnableWindow( hCtrl, .T. )
hCtrl = GetWindow( hCtrl, GW_HWNDNEXT )
end
ACTIVATE WINDOW oWnd
return nil
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Google [Bot] and 60 guests