private void buttonDialogs_Click(object sender, EventArgs e)
{
int i;
GraphicsWindow.Show();
Primitive items = "";
Primitive images = "";
for (i = 1; i <= 5; i++)
{
items[i] = "Item " + i;
images[i] = "C:\temp\test.jpg";
}
LDDialogs.AddRightClickMenu(items, images);
TextWindow.WriteLine(System.Windows.Media.RenderCapability.Tier >> 16);
Primitive a1 = LDArray.Create(1000);
Shapes.AddEllipse(50, 50);
FormPropertyGrid grid = new FormPropertyGrid();
grid.Display("_mainCanvas");
Primitive properties = grid.GetProperties("_mainCanvas");
for (i = 1; i <= SBArray.GetItemCount(properties); i++)
{
TextWindow.WriteLine(properties[i]);
}
grid.SetProperty("_mainCanvas.Children.Ellipse1.Opacity", 0.5);
Primitive font = LDDialogs.Font("");
Primitive font2 = LDDialogs.Font(font);
Primitive fileName = LDDialogs.OpenFile("Small Basic File (*.sb) |*.sb", "");
LDUtilities.Version();
GraphicsWindow.Show();
TextWindow.WriteLine(LDDialogs.Calendar(LDDateTime.Add(LDDateTime.Now(), 7))); //Now + 7 days
//LDUtilities.PauseUpdates();
LDDialogs.Wait("Please wait for a few seconds while I draw something...", LDColours.SetOpacity(LDColours.Violet, 200));
double start = Clock.ElapsedMilliseconds;
i = 1;
while (Clock.ElapsedMilliseconds < start + 5000)
{
Primitive ball = Shapes.AddEllipse(20, 20);
Shapes.Move(ball, SBMath.GetRandomNumber(GraphicsWindow.Width) - 10, SBMath.GetRandomNumber(GraphicsWindow.Height) - 10);
LDDialogs.ToolTip(ball, "Ball " + i++);
SBProgram.Delay(100);
}
//LDUtilities.ResumeUpdates();
LDDialogs.EndWait();
}
public static void DisplayResults()
{
int StackPointer = Stack.Add("UI.DisplayResults()");
LDGraphicsWindow.PauseUpdates();
//Clears the Dictionary to prevent errors
_Buttons.Clear();
_TextBox.Clear();
/*
* _CheckBox.Clear();
* _ComboBox.Clear();
*/
LDGraphicsWindow.Width = Desktop.Width;
LDGraphicsWindow.Height = Desktop.Height;
GraphicsWindow.Left = 0;
GraphicsWindow.Top = 0;
GlobalStatic.UIx = GlobalStatic.Listview_Width + 50;
DisplayHelper();
//Sort
GraphicsWindow.FontSize = GlobalStatic.DefaultFontSize + 1;
string AscDesc = "1=" + Language.Localization["Asc"] + ";2=" + Language.Localization["Desc"] + ";3=RANDOM();";
GlobalStatic.ComboBox["Sort"] = LDControls.AddComboBox(Engines.Schema, 100, 100);
GlobalStatic.ComboBox["ASCDESC"] = LDControls.AddComboBox(AscDesc, 110, 100);
_Buttons.AddOrReplace("Sort", Controls.AddButton(Language.Localization["Sort"], GlobalStatic.UIx + 10, 120));
Controls.Move(GlobalStatic.ComboBox["Sort"], GlobalStatic.UIx + 80, 77);
Controls.Move(GlobalStatic.ComboBox["ASCDESC"], GlobalStatic.UIx + 190, 77);
Controls.SetSize(_Buttons["Sort"], 290, 30);
LDDialogs.ToolTip(_Buttons["Sort"], "Iniates a sort based on user set parameters"); //Localize
LDDialogs.ToolTip(GlobalStatic.ComboBox["ASCDESC"], "Sorts Ascending and Decending based on position"); //Localize
//Search
GlobalStatic.ComboBox["Search"] = LDControls.AddComboBox(Engines.Schema, 200, 120);
_TextBox.AddOrReplace("Search", Controls.AddTextBox(GlobalStatic.UIx + 100, 210));
GlobalStatic.CheckBox["StrictSearch"] = LDControls.AddCheckBox(Language.Localization["Strict Search"]);
GlobalStatic.CheckBox["InvertSearch"] = LDControls.AddCheckBox(Language.Localization["Invert"]);
_Buttons.AddOrReplace("Search", Controls.AddButton(Language.Localization["Search"].ToUpper(), GlobalStatic.UIx + 10, 260));
Controls.Move(GlobalStatic.CheckBox["StrictSearch"], GlobalStatic.UIx + 20, 240);
Controls.Move(GlobalStatic.CheckBox["InvertSearch"], GlobalStatic.UIx + 150, 240);
Controls.Move(GlobalStatic.ComboBox["Search"], GlobalStatic.UIx + 100, 180);
Controls.SetSize(_TextBox["Search"], 200, 25);
Controls.SetSize(_Buttons["Search"], 290, 30);
//Functions
GlobalStatic.ComboBox["FunctionList"] = LDControls.AddComboBox(Engines.Functions(Engines.CurrentEngine).ToPrimitiveArray(), 130, 100);
GlobalStatic.ComboBox["ColumnList"] = LDControls.AddComboBox(Engines.Schema, 135, 100);
Controls.Move(GlobalStatic.ComboBox["FunctionList"], GlobalStatic.UIx + 10, 315);
Controls.Move(GlobalStatic.ComboBox["ColumnList"], GlobalStatic.UIx + 160, 315);
_Buttons.AddOrReplace("RunFunction", Controls.AddButton(Language.Localization["Run Function"].ToUpper(), GlobalStatic.UIx + 10, 345));
Controls.SetSize(_Buttons["RunFunction"], 290, 30);
//Custom Query
_TextBox["CustomQuery"] = Controls.AddMultiLineTextBox(GlobalStatic.UIx, 420);
Controls.SetSize(_TextBox["CustomQuery"], 310, 150);
_Buttons.AddOrReplace("Query", Controls.AddButton(Language.Localization["Query"].ToUpper(), GlobalStatic.UIx, 580));
Controls.SetSize(_Buttons["Query"], 310, 30);
_Buttons.AddOrReplace("Command", Controls.AddButton(Language.Localization["Command"].ToUpper(), GlobalStatic.UIx, 615));
Controls.SetSize(_Buttons["Command"], 310, 30);
LDDialogs.ToolTip(_Buttons["Command"], "Executes customized SQL command statements onto the database"); //Localize
string CustomQueryData = "This Textbox allows you to use Custom\nSQL Queries. Remove this and type in an SQL \nstatement. \nYou also use it to export data"; //Localize
Controls.SetTextBoxText(_TextBox["CustomQuery"], CustomQueryData);
//Hide Display Results
_HideDisplay.Clear();
_HideDisplay.Add(GlobalStatic.ComboBox["Sort"]);
_HideDisplay.Add(GlobalStatic.ComboBox["ASCDESC"]);
_HideDisplay.Add(Buttons["Sort"]);
_HideDisplay.Add(GlobalStatic.ComboBox["Search"]);
_HideDisplay.Add(_TextBox["Search"]);
_HideDisplay.Add(GlobalStatic.CheckBox["StrictSearch"]);
_HideDisplay.Add(GlobalStatic.CheckBox["InvertSearch"]);
_HideDisplay.Add(Buttons["Search"]);
_HideDisplay.Add(GlobalStatic.ComboBox["FunctionList"]);
_HideDisplay.Add(GlobalStatic.ComboBox["ColumnList"]);
_HideDisplay.Add(Buttons["RunFunction"]);
_HideDisplay.Add(_TextBox["CustomQuery"]);
_HideDisplay.Add(Buttons["Query"]);
_HideDisplay.Add(Buttons["Command"]);
LDGraphicsWindow.ResumeUpdates();
Stack.Exit(StackPointer);
}