VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



VbEclipse Version 1.0 Final (docking MDI solution) Updated: 01/09/2007

by AB-Software (4 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: VB Script
Difficulty: Advanced
Date Added: Wed 3rd February 2021
Rating: (83 Votes)

The VbEclipse project is a Visual Basic 6.0 implementation of the Eclipse perspectives. It provides a high flexible and complete configurable docking MDI solution with a nice user interface.
FEATURES: + Multiple Perspectives + Tabbed Views + Drag & Drop Support + Maximize and Restore Views / Editors + Windows XP Schemes (Classic, Metallic, HomeStead, Normal) + Custom Color Scheme Support by IScheme Interface + Floating Views + Auto hide tab navigation buttons + Disable tab navigation buttons +


* * * * * P L E A S E V O T E * * * * *

API Declarations
Private Sub Form_Load()

With Me.ucPerspective1

' Set the handle of main window
.MainHwnd = Me.hWnd

' Register the views
.AddView "Favorites", frmViewFavorites
.AddView "History", frmViewHistory
.AddView "Console", frmViewConsole

' Perspective without an editor area
With .AddPerspective("OnlyViews")

' Add new folders with views
With .AddFolder("Project_Folder", vbRelLeft, 1, .ID_EDITOR_AREA)
.AddView "Project"
.AddView "Objects"
.ActiveViewId = "Objects" ' Set objects view as active view
End With
With .AddFolder("Properties_Folder", vbRelRight, 0.7, "Project_Folder")
.AddView "Properties"
.AddView "Help"
.ActiveViewId = "Help"
End With
With .AddFolder("Console_Folder", vbRelBottom, 0.7, "Properties_Folder")
.AddView "Console"
.AddView "Tasks"
.AddView "Code"
.ActiveViewId = "Tasks"
End With

' Set the perspectives active view
.ActiveViewId = "Project"

' Hide the editor area
.EditorAreaVisible = False

End With
' Create a browser perspective
With .AddPerspective("Browser")

' Add favorites left to the editor area
With .AddFolder("Left_Folder", REL_LEFT, 0.3, .ID_EDITOR_AREA)
.AddView "Favorites"
End With
' Add history bottom to favorites
With .AddFolder("Left_Bottom_Folder", REL_BOTTOM, 0.5, "Left_Folder")
.AddView "History"
End With
' Add console bottom to editor area
With .AddFolder("Bottom_Folder", REL_BOTTOM, 0.7, .ID_EDITOR_AREA)
.AddView "Console"
End With

' Show the editor area
.EditorAreaVisible = True

End With

' Display the browser perspective
.ShowPerspective "Browser"

End With

End Sub

Rate VbEclipse Version 1.0 Final (docking MDI solution) Updated: 01/09/2007

Upload

Download this snippet    Add to My Saved Code

VbEclipse Version 1.0 Final (docking MDI solution) Updated: 01/09/2007 Comments

No comments have been posted about VbEclipse Version 1.0 Final (docking MDI solution) Updated: 01/09/2007. Why not be the first to post a comment about VbEclipse Version 1.0 Final (docking MDI solution) Updated: 01/09/2007.

Post your comment

Subject:
Message:
0/1000 characters