public void InitializeTest()
{
this.R = new RHelper.RHelper();
this.R.rExec += new RHelper.RExececutedEventHandler(R_Log);
this.R.Evaluate("library(OpenRepGrid)");
Debug.Print("Disposed");
}
public ProjectService(RHelper.RHelper r)
{
this.rEngine = r;
this.CurrentProject = new Project();
this.rEngine.Evaluate("library(OpenRepGrid)");
this.ShowTrim = this.ShowTrim;
this.ShowCut = this.ShowCut;
this.ShowScale = this.ShowScale;
this.ShowMeta = this.ShowMeta;
this.PrintConstructId = this.PrintConstructId;
this.PrintElementId = this.PrintElementId;
}
public FormMain()
{
InitializeComponent();
try
{
r = new RHelper.RHelper();
this.r = new RHelper.RHelper();
this.r.rExec += new RHelper.RExececutedEventHandler(R_rExec);
this.r.AutoPrint = true;
this.ucRConsole1.rEngine = this.r;
this.Service = new ProjectService(r);
this.Service.CurrentProject.Name = "<new name here>";
this.Service.CurrentProject.ResetHasChanges();
this.projectBindingSource.DataSource = this.Service;
this.projectBindingSource.DataMember = "CurrentProject";
ToolStripMenuItem parent = loadDemosFromLiteratureincludedInOpenRepGridToolStripMenuItem;
foreach (String key in service.DemoData.Keys)
{
ToolStripMenuItem m = new ToolStripMenuItem(key);
m.ToolTipText = service.DemoData[key];
m.Tag = key;
m.Click += new EventHandler(Load_Demo_Button_Click);
parent.DropDownItems.Add(m);
}
MessageBox.Show("this software is still in beta-Phase. -- The OpenRepGrid Library is programmed by Mark Heckmann.");
}
catch (Exception ex)
{
MessageBox.Show(ex.Message, "Error during init R-Instance -- Program terminates now.");
Application.Exit();
this.Close();
}
}