This commit is contained in:
Jsj
2007-12-05 20:51:58 +00:00
parent f05c7d0937
commit 5f7f94d1c9
14 changed files with 129 additions and 27 deletions

View File

@@ -10,14 +10,19 @@ using System.Windows.Forms;
using VEPROMS.CSLA.Library;
using Csla;
using DevComponents;
using DevComponents.DotNetBar;
using DevComponents.DotNetBar.Rendering;
using Csla.Validation;
using VEPROMS.Properties;
using Volian.Controls.Library;
using DescriptiveEnum;
[assembly: log4net.Config.XmlConfigurator(Watch = true)]
namespace VEPROMS
{
enum PropPgStyle { Button = 1, Tab = 2, Grid = 3 };
public partial class frmVEPROMS : DevComponents.DotNetBar.Office2007RibbonForm
{
#region Log4Net
@@ -43,9 +48,7 @@ namespace VEPROMS
InitializeComponent();
// set the color of the ribbon
// - get the color selected by user if available
// TO DO: set and read from Settings.settings
//DevComponents.DotNetBar.RibbonPredefinedColorSchemes.ChangeOffice2007ColorTable((Settings.Default["SystemColor"] != null) ? Settings.Default.SystemColor : (int)DevComponents.DotNetBar.Rendering.eOffice2007ColorScheme.Black);
RibbonPredefinedColorSchemes.ChangeOffice2007ColorTable((eOffice2007ColorScheme)Settings.Default.SystemColor);
VETreeNode tn = VETreeNode.GetFolder(1);
tv.Nodes.Add(tn);
@@ -305,7 +308,7 @@ namespace VEPROMS
// 2 - Tab dialog interface
// 3 - Property Grid interface
this.Cursor = Cursors.WaitCursor;
if ((int)Settings.Default["PropPageStyle"] == 3)
if ((int)Settings.Default["PropPageStyle"] == (int)PropPgStyle.Grid)
DoPropertyGrid(); // Will display a Property Grid interface
else
DoPropertyPages(); // Will display either a Button or a Tab dialog
@@ -386,7 +389,7 @@ namespace VEPROMS
/// </summary>
private void DoPropertyPages()
{
// Display a property page. (this does either a tabbed or button interface)
// Display a property page. (the ppStyle selects either a tabbed or button interface)
VETreeNode tn = (VETreeNode)(tv.SelectedNode);
switch (tn.VEObject.GetType().Name)
{
@@ -766,10 +769,7 @@ namespace VEPROMS
private void OpenItem(ItemInfo item)
{
DisplayPanel vlnCSLAPanel1;
ItemInfo tmp = item;
while (tmp.MyContent.Type >= 10000) tmp = (ItemInfo)tmp.ActiveParent;
vlnCSLAPanel1 = AddProcedureTab(tmp);
DisplayPanel vlnCSLAPanel1 = AddProcedureTab(item.MyProcedure);
vlnCSLAPanel1.ItemSelect(item);
}