2 using System.Windows;
\r
3 using System.Windows.Controls;
\r
4 using System.Windows.Documents;
\r
5 using System.Windows.Input;
\r
6 using System.Windows.Media;
\r
7 using System.Windows.Media.Animation;
\r
8 using System.Windows.Media.Imaging;
\r
9 using System.Windows.Shapes;
\r
10 using System.Windows.Browser;
\r
11 using System.Windows.Data;
\r
20 class Widget : public Figure {
\r
32 static bool initialized__;
\r
33 static Image default_button, default_horiz_grad;
\r
34 enum TYPE_TAG { NORMAL, ALERT };
\r
36 Color normal_foreground[2], active_foreground[2];
\r
37 Color normal_background[2], active_background[2], over_background[2];
\r
38 Stroke normal_stroke[2], active_stroke[2];
\r
39 Image button_back, *horiz_grad;
\r
41 static Theme current;
\r
42 static void initialize();
\r
47 class WidgetRect : Widget
\r
50 HumanInterfaceDevice::ButtonStateHolder mleft;
\r
55 //Theme::TYPE_TAG theme_type;
\r
56 public Rectangle area;
\r
57 public Letters label;
\r
59 public abstract WidgetRect();
\r
60 public virtual const Point getDatum() const;
\r
61 public virtual WidgetRect& setDatum(const Point&);
\r
62 public virtual WidgetRect& centering(const Point&);
\r
63 public double getWidth() const;
\r
64 public double getHeight() const;
\r
65 public double getLeft() const;
\r
66 public double getTop() const;
\r
67 public double getRight() const;
\r
68 public double getBottom() const;
\r
69 public WidgetRect& alignLeft(const double lef);
\r
70 public WidgetRect& alignTop(const double to_);
\r
71 public WidgetRect& alignRight(const double rig);
\r
72 public WidgetRect& alignBottom(const double bot);
\r
74 public virtual WidgetRect& set(double wid, double hei);
\r
75 public virtual WidgetRect& set(std::wstring name);
\r
76 public virtual WidgetRect& set(std::wstring name, double hei);
\r
77 public virtual WidgetRect& setLabel(std::wstring s);
\r
78 public virtual WidgetRect& draw(Drawable &target = *Drawable::prime);
\r
79 public bool pushed();
\r
80 public WidgetRect& pushThis();
\r
87 public string label;
\r
88 public Rectangle outer;
\r
89 public Rectangle inner;
\r
90 public Stroke outer_strk;
\r
96 public Slider(double width, double height)
\r
100 public Slider set(double width, double height)
\r
102 outer = new Rectangle(width, height);
\r
103 outer.fill = Color.gray;
\r
104 inner = new Rectangle();
\r
105 inner.fill = Color.blue;
\r
106 outer_strk = new Stroke();
\r
107 outer_strk.color = Color.white;
\r
108 outer_strk.thick = 1;
\r
111 public void checkClick()
\r
113 if (outer.include(Mouse.position))
\r
115 outer.stroke = outer_strk;
\r
121 public class Button
\r
123 public static Color bgcolor;
\r
125 internal System.Windows.Controls.Button uibutton;
\r
127 public Button(string l)
\r
129 uibutton = new System.Windows.Controls.Button();
\r
130 uibutton.Content = l;
\r
132 public void str(string l) { }
\r
135 public class Slider
\r
137 public static Color bgcolor;
\r
139 internal System.Windows.UIElement instance;
\r
140 internal System.Windows.Controls.Slider uislider;
\r
141 internal System.Windows.Controls.TextBlock uilabel;
\r
142 internal System.Windows.Controls.TextBox uibox;
\r
143 internal string label;
\r
144 internal Interval range;
\r
145 internal SelfDelegate get_;
\r
146 internal SelfDelegate set_;
\r
147 internal double retval;
\r
148 internal bool setted_;
\r
152 bgcolor.set(.5,.5, .5, .3);
\r
155 public Slider(string l, Interval r, double initialvalue)
\r
157 retval = initialvalue;
\r
161 Psychlops.Widgets.Connector.stackSlider(this);
\r
162 get_ = new SelfDelegate(get__);
\r
163 set_ = new SelfDelegate(set__);
\r
164 while (!setted_) { System.Threading.Thread.Sleep(10); }
\r
166 public static implicit operator double(Slider s)
\r
171 public delegate void SelfDelegate(System.Windows.Controls.Slider s);
\r
172 public void get__(System.Windows.Controls.Slider s) { retval = s.Value; }
\r
173 public void set__(System.Windows.Controls.Slider s) { s.Value = retval; }
\r
175 public double getValue()
\r
177 if (uislider != null) {
\r
178 uislider.Dispatcher.BeginInvoke(get_, uislider);
\r
184 public void setValue(double v)
\r
186 if (uislider != null)
\r
189 uislider.Dispatcher.BeginInvoke(set_, uislider);
\r
193 public double value
\r
195 get { return getValue(); }
\r
196 set { setValue(value); }
\r
198 public bool changed { get; set; }
\r
202 public class Browser
\r
204 public class Element
\r
207 System.Object retval;
\r
214 public static Element byID(string id_tag)
\r
216 return getElementById(id_tag);
\r
218 public static Element getElementById(string id_tag)
\r
220 Element tmp = new Element();
\r
221 Internal.Main.widgetStack.Dispatcher.BeginInvoke(new Connector.VoidString(tmp.getElementById__), id_tag);
\r
224 void getElementById__(string id_tag)
\r
226 elem = HtmlPage.Document.GetElementById(id_tag);
\r
229 public void setProperty(string name, System.Object value)
\r
231 Internal.Main.widgetStack.Dispatcher.BeginInvoke(new Connector.VoidStringObject(setProperty__), name, value);
\r
233 public void setProperty__(string name, System.Object value)
\r
235 elem.SetProperty(name, value);
\r
239 public static implicit operator double(Element i) { return i.getValueAsDouble(); }
\r
240 public double getValueAsDouble()
\r
243 getProperty("value");
\r
246 v = double.Parse(retval.ToString());
\r
248 catch (FormatException e)
\r
255 public static implicit operator string(Element i) { return i.getProperty("value").ToString(); }
\r
256 public System.Object getProperty(string name)
\r
258 Internal.Main.widgetStack.Dispatcher.BeginInvoke(new Connector.VoidString(getProperty__), name);
\r
261 public void getProperty__(string name)
\r
263 retval = elem.GetProperty(name);
\r
269 internal static partial class Connector
\r
271 internal delegate void VoidString(string s);
\r
272 internal delegate void VoidStringObject(String s, System.Object o);
\r
274 public class Double02fFormatter : IValueConverter
\r
276 public object Convert(object value, Type targetType, object parameter, System.Globalization.CultureInfo culture)
\r
278 string formatString = parameter as string;
\r
279 if (!string.IsNullOrEmpty(formatString))
\r
281 return string.Format(culture, formatString, value);
\r
283 return string.Format("{0, -8:F}", value);
\r
285 public object ConvertBack(object val, Type targetType, object parameter, System.Globalization.CultureInfo culture)
\r
287 string str = val.ToString();
\r
289 var objCultureInfo = new System.Globalization.CultureInfo("en-US");
\r
290 if (Double.TryParse(str, System.Globalization.NumberStyles.Number, objCultureInfo, out result))
\r
298 delegate void StackSlider_(Slider s);
\r
299 internal static void stackSlider(Slider s)
\r
301 Internal.Main.widgetStack.Dispatcher.BeginInvoke(new StackSlider_(stackSlider__), s);
\r
303 static void stackSlider__(Slider ss)
\r
305 var label = new System.Windows.Controls.TextBlock { Text = ss.label };
\r
306 label.Foreground = Color.white;
\r
307 System.Windows.Controls.Canvas.SetLeft(label, 3);
\r
308 System.Windows.Controls.Canvas.SetTop(label, 3);
\r
309 ss.uilabel = label;
\r
311 var holder = new System.Windows.Controls.Canvas { Width = 200, Height = 50 };
\r
312 var val = new System.Windows.Controls.TextBox { Width = 100 };
\r
313 System.Windows.Controls.Canvas.SetLeft(val, 100);
\r
314 var slide = new System.Windows.Controls.Slider {
\r
315 Minimum = ss.range.begin.value, Maximum = ss.range.end.value,
\r
318 Tag = ss, Width = 200,
\r
320 System.Windows.Controls.Canvas.SetTop(slide, label.ActualHeight - 3);
\r
321 var b = new System.Windows.Data.Binding {
\r
322 Path = new PropertyPath("Value"),
\r
323 Mode = System.Windows.Data.BindingMode.TwoWay,
\r
325 Converter = new Double02fFormatter()
\r
327 val.SetBinding(TextBox.TextProperty, b);
\r
328 ss.uislider = slide;
\r
330 val.Background = Color.null_color;
\r
331 val.BorderBrush = Color.null_color;
\r
332 val.Foreground = Color.white;
\r
333 val.TextAlignment = TextAlignment.Right;
\r
335 holder.Background = Slider.bgcolor;
\r
337 holder.Children.Add(label);
\r
338 holder.Children.Add(val);
\r
339 holder.Children.Add(slide);
\r
340 holder.Height = label.ActualHeight + slide.ActualHeight + val.ActualHeight + 15;
\r
341 ss.instance = holder;
\r
342 Internal.Main.widgetStack.Children.Add(ss.instance);
\r