Version: 4:11:02

Se arrglo el resumen dia, ahora puedes entrar sin necesidad de hacer algun pedido sin que truene, se muestra la cantidad de clientes visitados sin importar si tienen o no tienen venta y tambien se le agrego la cantidad de clientes que si tienen venta.
This commit is contained in:
IsR0d
2024-11-04 12:36:27 -06:00
parent 65319638b4
commit f9f3ff7d6e
545 changed files with 22807 additions and 103664 deletions

View File

@@ -10,7 +10,7 @@ public class b4xseekbar extends B4AClass.ImplB4AClass implements BA.SubDelegator
private static java.util.HashMap<String, java.lang.reflect.Method> htSubs;
private void innerInitialize(BA _ba) throws Exception {
if (ba == null) {
ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xseekbar");
ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xseekbar");
if (htSubs == null) {
ba.loadHtSubs(this.getClass());
htSubs = ba.htSubs;
@@ -23,14 +23,7 @@ public class b4xseekbar extends B4AClass.ImplB4AClass implements BA.SubDelegator
ba.raiseEvent2(null, true, "class_globals", false);
}
public void innerInitializeHelper(anywheresoftware.b4a.BA _ba) throws Exception{
innerInitialize(_ba);
}
public Object callSub(String sub, Object sender, Object[] args) throws Exception {
return BA.SubDelegator.SubNotFound;
}
public anywheresoftware.b4a.keywords.Common __c = null;
public anywheresoftware.b4a.keywords.Common __c = null;
public String _meventname = "";
public Object _mcallback = null;
public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null;
@@ -64,380 +57,241 @@ public keymon.lat.medicomed.b4xpages _b4xpages = null;
public keymon.lat.medicomed.b4xcollections _b4xcollections = null;
public keymon.lat.medicomed.httputils2service _httputils2service = null;
public keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null;
public String _update(keymon.lat.medicomed.b4xseekbar __ref) throws Exception{
__ref = this;
RDebugUtils.currentModule="b4xseekbar";
if (Debug.shouldDelegate(ba, "update", true))
{return ((String) Debug.delegate(ba, "update", null));}
int _s1 = 0;
int _y = 0;
int _x = 0;
RDebugUtils.currentLine=59637760;
//BA.debugLineNum = 59637760;BA.debugLine="Public Sub Update";
RDebugUtils.currentLine=59637762;
//BA.debugLineNum = 59637762;BA.debugLine="cvs.ClearRect(cvs.TargetRect)";
__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect());
RDebugUtils.currentLine=59637763;
//BA.debugLineNum = 59637763;BA.debugLine="If size > 0 Then";
if (__ref._size /*int*/ >0) {
RDebugUtils.currentLine=59637764;
//BA.debugLineNum = 59637764;BA.debugLine="If Vertical = False Then";
if (__ref._vertical /*boolean*/ ==__c.False) {
RDebugUtils.currentLine=59637765;
//BA.debugLineNum = 59637765;BA.debugLine="Dim s1 As Int = Radius2 + (mValue - MinValue) /";
_s1 = (int) (__ref._radius2 /*int*/ +(__ref._mvalue /*int*/ -__ref._minvalue /*int*/ )/(double)(__ref._maxvalue /*int*/ -__ref._minvalue /*int*/ )*__ref._size /*int*/ );
RDebugUtils.currentLine=59637766;
//BA.debugLineNum = 59637766;BA.debugLine="Dim y As Int = mBase.Height / 2";
_y = (int) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)2);
RDebugUtils.currentLine=59637767;
//BA.debugLineNum = 59637767;BA.debugLine="cvs.DrawLine(Radius2, y, s1, y, Color1, Size1)";
__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawLine((float) (__ref._radius2 /*int*/ ),(float) (_y),(float) (_s1),(float) (_y),__ref._color1 /*int*/ ,(float) (__ref._size1 /*int*/ ));
RDebugUtils.currentLine=59637768;
//BA.debugLineNum = 59637768;BA.debugLine="cvs.DrawLine(s1, y, mBase.Width - Radius2, y, C";
__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawLine((float) (_s1),(float) (_y),(float) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()-__ref._radius2 /*int*/ ),(float) (_y),__ref._color2 /*int*/ ,(float) (__ref._size2 /*int*/ ));
RDebugUtils.currentLine=59637769;
//BA.debugLineNum = 59637769;BA.debugLine="cvs.DrawCircle(s1, y, Radius1, Color1, True, 0)";
__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle((float) (_s1),(float) (_y),(float) (__ref._radius1 /*int*/ ),__ref._color1 /*int*/ ,__c.True,(float) (0));
RDebugUtils.currentLine=59637770;
//BA.debugLineNum = 59637770;BA.debugLine="If Pressed Then";
if (__ref._pressed /*boolean*/ ) {
RDebugUtils.currentLine=59637771;
//BA.debugLineNum = 59637771;BA.debugLine="cvs.DrawCircle(s1, y, Radius2, ThumbColor, Tru";
__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle((float) (_s1),(float) (_y),(float) (__ref._radius2 /*int*/ ),__ref._thumbcolor /*int*/ ,__c.True,(float) (0));
};
}else {
RDebugUtils.currentLine=59637774;
//BA.debugLineNum = 59637774;BA.debugLine="Dim s1 As Int = Radius2 + (MaxValue - mValue) /";
_s1 = (int) (__ref._radius2 /*int*/ +(__ref._maxvalue /*int*/ -__ref._mvalue /*int*/ )/(double)(__ref._maxvalue /*int*/ -__ref._minvalue /*int*/ )*__ref._size /*int*/ );
RDebugUtils.currentLine=59637775;
//BA.debugLineNum = 59637775;BA.debugLine="Dim x As Int = mBase.Width / 2";
_x = (int) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)2);
RDebugUtils.currentLine=59637776;
//BA.debugLineNum = 59637776;BA.debugLine="cvs.DrawLine(x, Radius2, x, s1, Color2, Size2)";
__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawLine((float) (_x),(float) (__ref._radius2 /*int*/ ),(float) (_x),(float) (_s1),__ref._color2 /*int*/ ,(float) (__ref._size2 /*int*/ ));
RDebugUtils.currentLine=59637777;
//BA.debugLineNum = 59637777;BA.debugLine="cvs.DrawLine(x, s1, x, mBase.Height - Radius2,";
__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawLine((float) (_x),(float) (_s1),(float) (_x),(float) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()-__ref._radius2 /*int*/ ),__ref._color1 /*int*/ ,(float) (__ref._size1 /*int*/ ));
RDebugUtils.currentLine=59637778;
//BA.debugLineNum = 59637778;BA.debugLine="cvs.DrawCircle(x, s1, Radius1, Color1, True, 0)";
__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle((float) (_x),(float) (_s1),(float) (__ref._radius1 /*int*/ ),__ref._color1 /*int*/ ,__c.True,(float) (0));
RDebugUtils.currentLine=59637779;
//BA.debugLineNum = 59637779;BA.debugLine="If Pressed Then";
if (__ref._pressed /*boolean*/ ) {
RDebugUtils.currentLine=59637780;
//BA.debugLineNum = 59637780;BA.debugLine="cvs.DrawCircle(x, s1, Radius2, ThumbColor, Tru";
__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle((float) (_x),(float) (_s1),(float) (__ref._radius2 /*int*/ ),__ref._thumbcolor /*int*/ ,__c.True,(float) (0));
};
};
};
RDebugUtils.currentLine=59637784;
//BA.debugLineNum = 59637784;BA.debugLine="cvs.Invalidate";
__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate();
RDebugUtils.currentLine=59637785;
//BA.debugLineNum = 59637785;BA.debugLine="End Sub";
public String _base_resize(double _width,double _height) throws Exception{
//BA.debugLineNum = 52;BA.debugLine="Public Sub Base_Resize (Width As Double, Height As";
//BA.debugLineNum = 53;BA.debugLine="cvs.Resize(Width, Height)";
_cvs.Resize((float) (_width),(float) (_height));
//BA.debugLineNum = 54;BA.debugLine="TouchPanel.SetLayoutAnimated(0, 0, 0, Width, Heig";
_touchpanel.SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height));
//BA.debugLineNum = 55;BA.debugLine="Vertical = mBase.Height > mBase.Width";
_vertical = _mbase.getHeight()>_mbase.getWidth();
//BA.debugLineNum = 56;BA.debugLine="size = Max(mBase.Height, mBase.Width) - 2 * Radiu";
_size = (int) (__c.Max(_mbase.getHeight(),_mbase.getWidth())-2*_radius2);
//BA.debugLineNum = 57;BA.debugLine="Update";
_update();
//BA.debugLineNum = 58;BA.debugLine="End Sub";
return "";
}
public String _setvalue(keymon.lat.medicomed.b4xseekbar __ref,int _v) throws Exception{
__ref = this;
RDebugUtils.currentModule="b4xseekbar";
if (Debug.shouldDelegate(ba, "setvalue", true))
{return ((String) Debug.delegate(ba, "setvalue", new Object[] {_v}));}
RDebugUtils.currentLine=59899904;
//BA.debugLineNum = 59899904;BA.debugLine="Public Sub setValue(v As Int)";
RDebugUtils.currentLine=59899905;
//BA.debugLineNum = 59899905;BA.debugLine="mValue = Max(MinValue, Min(MaxValue, v))";
__ref._mvalue /*int*/ = (int) (__c.Max(__ref._minvalue /*int*/ ,__c.Min(__ref._maxvalue /*int*/ ,_v)));
RDebugUtils.currentLine=59899906;
//BA.debugLineNum = 59899906;BA.debugLine="Update";
__ref._update /*String*/ (null);
RDebugUtils.currentLine=59899907;
//BA.debugLineNum = 59899907;BA.debugLine="End Sub";
return "";
}
public String _base_resize(keymon.lat.medicomed.b4xseekbar __ref,double _width,double _height) throws Exception{
__ref = this;
RDebugUtils.currentModule="b4xseekbar";
if (Debug.shouldDelegate(ba, "base_resize", true))
{return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));}
RDebugUtils.currentLine=59572224;
//BA.debugLineNum = 59572224;BA.debugLine="Public Sub Base_Resize (Width As Double, Height As";
RDebugUtils.currentLine=59572225;
//BA.debugLineNum = 59572225;BA.debugLine="cvs.Resize(Width, Height)";
__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Resize((float) (_width),(float) (_height));
RDebugUtils.currentLine=59572226;
//BA.debugLineNum = 59572226;BA.debugLine="TouchPanel.SetLayoutAnimated(0, 0, 0, Width, Heig";
__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height));
RDebugUtils.currentLine=59572227;
//BA.debugLineNum = 59572227;BA.debugLine="Vertical = mBase.Height > mBase.Width";
__ref._vertical /*boolean*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()>__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth();
RDebugUtils.currentLine=59572228;
//BA.debugLineNum = 59572228;BA.debugLine="size = Max(mBase.Height, mBase.Width) - 2 * Radiu";
__ref._size /*int*/ = (int) (__c.Max(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth())-2*__ref._radius2 /*int*/ );
RDebugUtils.currentLine=59572229;
//BA.debugLineNum = 59572229;BA.debugLine="Update";
__ref._update /*String*/ (null);
RDebugUtils.currentLine=59572230;
//BA.debugLineNum = 59572230;BA.debugLine="End Sub";
return "";
}
public String _class_globals(keymon.lat.medicomed.b4xseekbar __ref) throws Exception{
__ref = this;
RDebugUtils.currentModule="b4xseekbar";
RDebugUtils.currentLine=59375616;
//BA.debugLineNum = 59375616;BA.debugLine="Sub Class_Globals";
RDebugUtils.currentLine=59375617;
//BA.debugLineNum = 59375617;BA.debugLine="Private mEventName As String 'ignore";
public String _class_globals() throws Exception{
//BA.debugLineNum = 11;BA.debugLine="Sub Class_Globals";
//BA.debugLineNum = 12;BA.debugLine="Private mEventName As String 'ignore";
_meventname = "";
RDebugUtils.currentLine=59375618;
//BA.debugLineNum = 59375618;BA.debugLine="Private mCallBack As Object 'ignore";
//BA.debugLineNum = 13;BA.debugLine="Private mCallBack As Object 'ignore";
_mcallback = new Object();
RDebugUtils.currentLine=59375619;
//BA.debugLineNum = 59375619;BA.debugLine="Public mBase As B4XView 'ignore";
//BA.debugLineNum = 14;BA.debugLine="Public mBase As B4XView 'ignore";
_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper();
RDebugUtils.currentLine=59375620;
//BA.debugLineNum = 59375620;BA.debugLine="Private xui As XUI 'ignore";
//BA.debugLineNum = 15;BA.debugLine="Private xui As XUI 'ignore";
_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI();
RDebugUtils.currentLine=59375621;
//BA.debugLineNum = 59375621;BA.debugLine="Public Color1, Color2, ThumbColor As Int";
//BA.debugLineNum = 16;BA.debugLine="Public Color1, Color2, ThumbColor As Int";
_color1 = 0;
_color2 = 0;
_thumbcolor = 0;
RDebugUtils.currentLine=59375622;
//BA.debugLineNum = 59375622;BA.debugLine="Private cvs As B4XCanvas";
//BA.debugLineNum = 17;BA.debugLine="Private cvs As B4XCanvas";
_cvs = new anywheresoftware.b4a.objects.B4XCanvas();
RDebugUtils.currentLine=59375623;
//BA.debugLineNum = 59375623;BA.debugLine="Public Tag As Object";
//BA.debugLineNum = 18;BA.debugLine="Public Tag As Object";
_tag = new Object();
RDebugUtils.currentLine=59375624;
//BA.debugLineNum = 59375624;BA.debugLine="Private TouchPanel As B4XView";
//BA.debugLineNum = 19;BA.debugLine="Private TouchPanel As B4XView";
_touchpanel = new anywheresoftware.b4a.objects.B4XViewWrapper();
RDebugUtils.currentLine=59375625;
//BA.debugLineNum = 59375625;BA.debugLine="Private mValue As Int";
//BA.debugLineNum = 20;BA.debugLine="Private mValue As Int";
_mvalue = 0;
RDebugUtils.currentLine=59375626;
//BA.debugLineNum = 59375626;BA.debugLine="Public MinValue, MaxValue As Int";
//BA.debugLineNum = 21;BA.debugLine="Public MinValue, MaxValue As Int";
_minvalue = 0;
_maxvalue = 0;
RDebugUtils.currentLine=59375627;
//BA.debugLineNum = 59375627;BA.debugLine="Public Interval As Int = 1";
//BA.debugLineNum = 22;BA.debugLine="Public Interval As Int = 1";
_interval = (int) (1);
RDebugUtils.currentLine=59375628;
//BA.debugLineNum = 59375628;BA.debugLine="Private Vertical As Boolean";
//BA.debugLineNum = 23;BA.debugLine="Private Vertical As Boolean";
_vertical = false;
RDebugUtils.currentLine=59375629;
//BA.debugLineNum = 59375629;BA.debugLine="Public Size1 = 4dip, Size2 = 2dip, Radius1 = 6dip";
//BA.debugLineNum = 24;BA.debugLine="Public Size1 = 4dip, Size2 = 2dip, Radius1 = 6dip";
_size1 = __c.DipToCurrent((int) (4));
_size2 = __c.DipToCurrent((int) (2));
_radius1 = __c.DipToCurrent((int) (6));
_radius2 = __c.DipToCurrent((int) (12));
RDebugUtils.currentLine=59375630;
//BA.debugLineNum = 59375630;BA.debugLine="Private Pressed As Boolean";
//BA.debugLineNum = 25;BA.debugLine="Private Pressed As Boolean";
_pressed = false;
RDebugUtils.currentLine=59375631;
//BA.debugLineNum = 59375631;BA.debugLine="Private size As Int";
//BA.debugLineNum = 26;BA.debugLine="Private size As Int";
_size = 0;
RDebugUtils.currentLine=59375632;
//BA.debugLineNum = 59375632;BA.debugLine="End Sub";
//BA.debugLineNum = 27;BA.debugLine="End Sub";
return "";
}
public String _designercreateview(keymon.lat.medicomed.b4xseekbar __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{
__ref = this;
RDebugUtils.currentModule="b4xseekbar";
if (Debug.shouldDelegate(ba, "designercreateview", true))
{return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));}
RDebugUtils.currentLine=59506688;
//BA.debugLineNum = 59506688;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl";
RDebugUtils.currentLine=59506689;
//BA.debugLineNum = 59506689;BA.debugLine="mBase = Base";
__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base));
RDebugUtils.currentLine=59506690;
//BA.debugLineNum = 59506690;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me";
__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag();
RDebugUtils.currentLine=59506690;
//BA.debugLineNum = 59506690;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me";
__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this);
RDebugUtils.currentLine=59506691;
//BA.debugLineNum = 59506691;BA.debugLine="Color1 = xui.PaintOrColorToColor(Props.Get(\"Color";
__ref._color1 /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("Color1")));
RDebugUtils.currentLine=59506692;
//BA.debugLineNum = 59506692;BA.debugLine="Color2 = xui.PaintOrColorToColor(Props.Get(\"Color";
__ref._color2 /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("Color2")));
RDebugUtils.currentLine=59506693;
//BA.debugLineNum = 59506693;BA.debugLine="ThumbColor = xui.PaintOrColorToColor(Props.Get(\"T";
__ref._thumbcolor /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("ThumbColor")));
RDebugUtils.currentLine=59506694;
//BA.debugLineNum = 59506694;BA.debugLine="Interval = Max(1, Props.GetDefault(\"Interval\", 1)";
__ref._interval /*int*/ = (int) (__c.Max(1,(double)(BA.ObjectToNumber(_props.GetDefault((Object)("Interval"),(Object)(1))))));
RDebugUtils.currentLine=59506695;
//BA.debugLineNum = 59506695;BA.debugLine="MinValue = Props.Get(\"Min\")";
__ref._minvalue /*int*/ = (int)(BA.ObjectToNumber(_props.Get((Object)("Min"))));
RDebugUtils.currentLine=59506696;
//BA.debugLineNum = 59506696;BA.debugLine="MaxValue = Props.Get(\"Max\")";
__ref._maxvalue /*int*/ = (int)(BA.ObjectToNumber(_props.Get((Object)("Max"))));
RDebugUtils.currentLine=59506697;
//BA.debugLineNum = 59506697;BA.debugLine="mValue = Max(MinValue, Min(MaxValue, Props.Get(\"V";
__ref._mvalue /*int*/ = (int) (__c.Max(__ref._minvalue /*int*/ ,__c.Min(__ref._maxvalue /*int*/ ,(double)(BA.ObjectToNumber(_props.Get((Object)("Value")))))));
RDebugUtils.currentLine=59506698;
//BA.debugLineNum = 59506698;BA.debugLine="cvs.Initialize(mBase)";
__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Initialize(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ );
RDebugUtils.currentLine=59506699;
//BA.debugLineNum = 59506699;BA.debugLine="TouchPanel = xui.CreatePanel(\"TouchPanel\")";
__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"TouchPanel");
RDebugUtils.currentLine=59506700;
//BA.debugLineNum = 59506700;BA.debugLine="mBase.AddView(TouchPanel, 0, 0, mBase.Width, mBas";
__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight());
RDebugUtils.currentLine=59506701;
//BA.debugLineNum = 59506701;BA.debugLine="If xui.IsB4A Or xui.IsB4i Then Radius2 = 20dip";
if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4A() || __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4i()) {
__ref._radius2 /*int*/ = __c.DipToCurrent((int) (20));};
RDebugUtils.currentLine=59506702;
//BA.debugLineNum = 59506702;BA.debugLine="If xui.IsB4A Then Base_Resize(mBase.Width, mBase.";
if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4A()) {
__ref._base_resize /*String*/ (null,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight());};
RDebugUtils.currentLine=59506703;
//BA.debugLineNum = 59506703;BA.debugLine="End Sub";
public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{
//BA.debugLineNum = 35;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl";
//BA.debugLineNum = 36;BA.debugLine="mBase = Base";
_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base));
//BA.debugLineNum = 37;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me";
_tag = _mbase.getTag();
//BA.debugLineNum = 37;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me";
_mbase.setTag(this);
//BA.debugLineNum = 38;BA.debugLine="Color1 = xui.PaintOrColorToColor(Props.Get(\"Color";
_color1 = _xui.PaintOrColorToColor(_props.Get((Object)("Color1")));
//BA.debugLineNum = 39;BA.debugLine="Color2 = xui.PaintOrColorToColor(Props.Get(\"Color";
_color2 = _xui.PaintOrColorToColor(_props.Get((Object)("Color2")));
//BA.debugLineNum = 40;BA.debugLine="ThumbColor = xui.PaintOrColorToColor(Props.Get(\"T";
_thumbcolor = _xui.PaintOrColorToColor(_props.Get((Object)("ThumbColor")));
//BA.debugLineNum = 41;BA.debugLine="Interval = Max(1, Props.GetDefault(\"Interval\", 1)";
_interval = (int) (__c.Max(1,(double)(BA.ObjectToNumber(_props.GetDefault((Object)("Interval"),(Object)(1))))));
//BA.debugLineNum = 42;BA.debugLine="MinValue = Props.Get(\"Min\")";
_minvalue = (int)(BA.ObjectToNumber(_props.Get((Object)("Min"))));
//BA.debugLineNum = 43;BA.debugLine="MaxValue = Props.Get(\"Max\")";
_maxvalue = (int)(BA.ObjectToNumber(_props.Get((Object)("Max"))));
//BA.debugLineNum = 44;BA.debugLine="mValue = Max(MinValue, Min(MaxValue, Props.Get(\"V";
_mvalue = (int) (__c.Max(_minvalue,__c.Min(_maxvalue,(double)(BA.ObjectToNumber(_props.Get((Object)("Value")))))));
//BA.debugLineNum = 45;BA.debugLine="cvs.Initialize(mBase)";
_cvs.Initialize(_mbase);
//BA.debugLineNum = 46;BA.debugLine="TouchPanel = xui.CreatePanel(\"TouchPanel\")";
_touchpanel = _xui.CreatePanel(ba,"TouchPanel");
//BA.debugLineNum = 47;BA.debugLine="mBase.AddView(TouchPanel, 0, 0, mBase.Width, mBas";
_mbase.AddView((android.view.View)(_touchpanel.getObject()),(int) (0),(int) (0),_mbase.getWidth(),_mbase.getHeight());
//BA.debugLineNum = 48;BA.debugLine="If xui.IsB4A Or xui.IsB4i Then Radius2 = 20dip";
if (_xui.getIsB4A() || _xui.getIsB4i()) {
_radius2 = __c.DipToCurrent((int) (20));};
//BA.debugLineNum = 49;BA.debugLine="If xui.IsB4A Then Base_Resize(mBase.Width, mBase.";
if (_xui.getIsB4A()) {
_base_resize(_mbase.getWidth(),_mbase.getHeight());};
//BA.debugLineNum = 50;BA.debugLine="End Sub";
return "";
}
public int _getvalue(keymon.lat.medicomed.b4xseekbar __ref) throws Exception{
__ref = this;
RDebugUtils.currentModule="b4xseekbar";
if (Debug.shouldDelegate(ba, "getvalue", true))
{return ((Integer) Debug.delegate(ba, "getvalue", null));}
RDebugUtils.currentLine=59965440;
//BA.debugLineNum = 59965440;BA.debugLine="Public Sub getValue As Int";
RDebugUtils.currentLine=59965441;
//BA.debugLineNum = 59965441;BA.debugLine="Return mValue";
if (true) return __ref._mvalue /*int*/ ;
RDebugUtils.currentLine=59965442;
//BA.debugLineNum = 59965442;BA.debugLine="End Sub";
public int _getvalue() throws Exception{
//BA.debugLineNum = 130;BA.debugLine="Public Sub getValue As Int";
//BA.debugLineNum = 131;BA.debugLine="Return mValue";
if (true) return _mvalue;
//BA.debugLineNum = 132;BA.debugLine="End Sub";
return 0;
}
public String _initialize(keymon.lat.medicomed.b4xseekbar __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{
__ref = this;
public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{
innerInitialize(_ba);
RDebugUtils.currentModule="b4xseekbar";
if (Debug.shouldDelegate(ba, "initialize", true))
{return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));}
RDebugUtils.currentLine=59441152;
//BA.debugLineNum = 59441152;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa";
RDebugUtils.currentLine=59441153;
//BA.debugLineNum = 59441153;BA.debugLine="mEventName = EventName";
__ref._meventname /*String*/ = _eventname;
RDebugUtils.currentLine=59441154;
//BA.debugLineNum = 59441154;BA.debugLine="mCallBack = Callback";
__ref._mcallback /*Object*/ = _callback;
RDebugUtils.currentLine=59441155;
//BA.debugLineNum = 59441155;BA.debugLine="End Sub";
//BA.debugLineNum = 29;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa";
//BA.debugLineNum = 30;BA.debugLine="mEventName = EventName";
_meventname = _eventname;
//BA.debugLineNum = 31;BA.debugLine="mCallBack = Callback";
_mcallback = _callback;
//BA.debugLineNum = 32;BA.debugLine="End Sub";
return "";
}
public String _raisetouchstateevent(keymon.lat.medicomed.b4xseekbar __ref) throws Exception{
__ref = this;
RDebugUtils.currentModule="b4xseekbar";
if (Debug.shouldDelegate(ba, "raisetouchstateevent", true))
{return ((String) Debug.delegate(ba, "raisetouchstateevent", null));}
RDebugUtils.currentLine=59768832;
//BA.debugLineNum = 59768832;BA.debugLine="Private Sub RaiseTouchStateEvent";
RDebugUtils.currentLine=59768833;
//BA.debugLineNum = 59768833;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_TouchS";
if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_TouchStateChanged",(int) (1))) {
RDebugUtils.currentLine=59768834;
//BA.debugLineNum = 59768834;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_TouchS";
__c.CallSubDelayed2(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_TouchStateChanged",(Object)(__ref._pressed /*boolean*/ ));
public String _raisetouchstateevent() throws Exception{
//BA.debugLineNum = 102;BA.debugLine="Private Sub RaiseTouchStateEvent";
//BA.debugLineNum = 103;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_TouchS";
if (_xui.SubExists(ba,_mcallback,_meventname+"_TouchStateChanged",(int) (1))) {
//BA.debugLineNum = 104;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_TouchS";
__c.CallSubDelayed2(ba,_mcallback,_meventname+"_TouchStateChanged",(Object)(_pressed));
};
RDebugUtils.currentLine=59768836;
//BA.debugLineNum = 59768836;BA.debugLine="End Sub";
//BA.debugLineNum = 106;BA.debugLine="End Sub";
return "";
}
public String _setvaluebasedontouch(keymon.lat.medicomed.b4xseekbar __ref,int _x,int _y) throws Exception{
__ref = this;
RDebugUtils.currentModule="b4xseekbar";
if (Debug.shouldDelegate(ba, "setvaluebasedontouch", true))
{return ((String) Debug.delegate(ba, "setvaluebasedontouch", new Object[] {_x,_y}));}
public String _setvalue(int _v) throws Exception{
//BA.debugLineNum = 125;BA.debugLine="Public Sub setValue(v As Int)";
//BA.debugLineNum = 126;BA.debugLine="mValue = Max(MinValue, Min(MaxValue, v))";
_mvalue = (int) (__c.Max(_minvalue,__c.Min(_maxvalue,_v)));
//BA.debugLineNum = 127;BA.debugLine="Update";
_update();
//BA.debugLineNum = 128;BA.debugLine="End Sub";
return "";
}
public String _setvaluebasedontouch(int _x,int _y) throws Exception{
int _v = 0;
int _newvalue = 0;
RDebugUtils.currentLine=59834368;
//BA.debugLineNum = 59834368;BA.debugLine="Private Sub SetValueBasedOnTouch(x As Int, y As In";
RDebugUtils.currentLine=59834369;
//BA.debugLineNum = 59834369;BA.debugLine="Dim v As Int";
//BA.debugLineNum = 108;BA.debugLine="Private Sub SetValueBasedOnTouch(x As Int, y As In";
//BA.debugLineNum = 109;BA.debugLine="Dim v As Int";
_v = 0;
RDebugUtils.currentLine=59834370;
//BA.debugLineNum = 59834370;BA.debugLine="If Vertical Then";
if (__ref._vertical /*boolean*/ ) {
RDebugUtils.currentLine=59834371;
//BA.debugLineNum = 59834371;BA.debugLine="v = (mBase.Height - Radius2 - y) / size * (MaxVa";
_v = (int) ((__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()-__ref._radius2 /*int*/ -_y)/(double)__ref._size /*int*/ *(__ref._maxvalue /*int*/ -__ref._minvalue /*int*/ )+__ref._minvalue /*int*/ );
//BA.debugLineNum = 110;BA.debugLine="If Vertical Then";
if (_vertical) {
//BA.debugLineNum = 111;BA.debugLine="v = (mBase.Height - Radius2 - y) / size * (MaxVa";
_v = (int) ((_mbase.getHeight()-_radius2-_y)/(double)_size*(_maxvalue-_minvalue)+_minvalue);
}else {
RDebugUtils.currentLine=59834373;
//BA.debugLineNum = 59834373;BA.debugLine="v = (x - Radius2) / size * (MaxValue - MinValue)";
_v = (int) ((_x-__ref._radius2 /*int*/ )/(double)__ref._size /*int*/ *(__ref._maxvalue /*int*/ -__ref._minvalue /*int*/ )+__ref._minvalue /*int*/ );
//BA.debugLineNum = 113;BA.debugLine="v = (x - Radius2) / size * (MaxValue - MinValue)";
_v = (int) ((_x-_radius2)/(double)_size*(_maxvalue-_minvalue)+_minvalue);
};
RDebugUtils.currentLine=59834375;
//BA.debugLineNum = 59834375;BA.debugLine="v = Round (v / Interval) * Interval";
_v = (int) (__c.Round(_v/(double)__ref._interval /*int*/ )*__ref._interval /*int*/ );
RDebugUtils.currentLine=59834376;
//BA.debugLineNum = 59834376;BA.debugLine="Dim NewValue As Int = Max(MinValue, Min(MaxValue,";
_newvalue = (int) (__c.Max(__ref._minvalue /*int*/ ,__c.Min(__ref._maxvalue /*int*/ ,_v)));
RDebugUtils.currentLine=59834377;
//BA.debugLineNum = 59834377;BA.debugLine="If NewValue <> mValue Then";
if (_newvalue!=__ref._mvalue /*int*/ ) {
RDebugUtils.currentLine=59834378;
//BA.debugLineNum = 59834378;BA.debugLine="mValue = NewValue";
__ref._mvalue /*int*/ = _newvalue;
RDebugUtils.currentLine=59834379;
//BA.debugLineNum = 59834379;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Value";
if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_ValueChanged",(int) (1))) {
RDebugUtils.currentLine=59834380;
//BA.debugLineNum = 59834380;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_Value";
__c.CallSubDelayed2(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_ValueChanged",(Object)(__ref._mvalue /*int*/ ));
//BA.debugLineNum = 115;BA.debugLine="v = Round (v / Interval) * Interval";
_v = (int) (__c.Round(_v/(double)_interval)*_interval);
//BA.debugLineNum = 116;BA.debugLine="Dim NewValue As Int = Max(MinValue, Min(MaxValue,";
_newvalue = (int) (__c.Max(_minvalue,__c.Min(_maxvalue,_v)));
//BA.debugLineNum = 117;BA.debugLine="If NewValue <> mValue Then";
if (_newvalue!=_mvalue) {
//BA.debugLineNum = 118;BA.debugLine="mValue = NewValue";
_mvalue = _newvalue;
//BA.debugLineNum = 119;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Value";
if (_xui.SubExists(ba,_mcallback,_meventname+"_ValueChanged",(int) (1))) {
//BA.debugLineNum = 120;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_Value";
__c.CallSubDelayed2(ba,_mcallback,_meventname+"_ValueChanged",(Object)(_mvalue));
};
};
RDebugUtils.currentLine=59834383;
//BA.debugLineNum = 59834383;BA.debugLine="End Sub";
//BA.debugLineNum = 123;BA.debugLine="End Sub";
return "";
}
public String _touchpanel_touch(keymon.lat.medicomed.b4xseekbar __ref,int _action,float _x,float _y) throws Exception{
__ref = this;
RDebugUtils.currentModule="b4xseekbar";
if (Debug.shouldDelegate(ba, "touchpanel_touch", true))
{return ((String) Debug.delegate(ba, "touchpanel_touch", new Object[] {_action,_x,_y}));}
RDebugUtils.currentLine=59703296;
//BA.debugLineNum = 59703296;BA.debugLine="Private Sub TouchPanel_Touch (Action As Int, X As";
RDebugUtils.currentLine=59703297;
//BA.debugLineNum = 59703297;BA.debugLine="If Action = TouchPanel.TOUCH_ACTION_DOWN Then";
if (_action==__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_DOWN) {
RDebugUtils.currentLine=59703298;
//BA.debugLineNum = 59703298;BA.debugLine="Pressed = True";
__ref._pressed /*boolean*/ = __c.True;
RDebugUtils.currentLine=59703299;
//BA.debugLineNum = 59703299;BA.debugLine="RaiseTouchStateEvent";
__ref._raisetouchstateevent /*String*/ (null);
RDebugUtils.currentLine=59703300;
//BA.debugLineNum = 59703300;BA.debugLine="SetValueBasedOnTouch(X, Y)";
__ref._setvaluebasedontouch /*String*/ (null,(int) (_x),(int) (_y));
}else
{RDebugUtils.currentLine=59703301;
//BA.debugLineNum = 59703301;BA.debugLine="Else If Action = TouchPanel.TOUCH_ACTION_MOVE The";
if (_action==__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_MOVE) {
RDebugUtils.currentLine=59703302;
//BA.debugLineNum = 59703302;BA.debugLine="SetValueBasedOnTouch(X, Y)";
__ref._setvaluebasedontouch /*String*/ (null,(int) (_x),(int) (_y));
}else
{RDebugUtils.currentLine=59703303;
//BA.debugLineNum = 59703303;BA.debugLine="Else If Action = TouchPanel.TOUCH_ACTION_UP Then";
if (_action==__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_UP) {
RDebugUtils.currentLine=59703304;
//BA.debugLineNum = 59703304;BA.debugLine="Pressed = False";
__ref._pressed /*boolean*/ = __c.False;
RDebugUtils.currentLine=59703305;
//BA.debugLineNum = 59703305;BA.debugLine="RaiseTouchStateEvent";
__ref._raisetouchstateevent /*String*/ (null);
}}}
;
RDebugUtils.currentLine=59703307;
//BA.debugLineNum = 59703307;BA.debugLine="Update";
__ref._update /*String*/ (null);
RDebugUtils.currentLine=59703308;
//BA.debugLineNum = 59703308;BA.debugLine="End Sub";
public String _touchpanel_touch(int _action,float _x,float _y) throws Exception{
//BA.debugLineNum = 88;BA.debugLine="Private Sub TouchPanel_Touch (Action As Int, X As";
//BA.debugLineNum = 89;BA.debugLine="If Action = TouchPanel.TOUCH_ACTION_DOWN Then";
if (_action==_touchpanel.TOUCH_ACTION_DOWN) {
//BA.debugLineNum = 90;BA.debugLine="Pressed = True";
_pressed = __c.True;
//BA.debugLineNum = 91;BA.debugLine="RaiseTouchStateEvent";
_raisetouchstateevent();
//BA.debugLineNum = 92;BA.debugLine="SetValueBasedOnTouch(X, Y)";
_setvaluebasedontouch((int) (_x),(int) (_y));
}else if(_action==_touchpanel.TOUCH_ACTION_MOVE) {
//BA.debugLineNum = 94;BA.debugLine="SetValueBasedOnTouch(X, Y)";
_setvaluebasedontouch((int) (_x),(int) (_y));
}else if(_action==_touchpanel.TOUCH_ACTION_UP) {
//BA.debugLineNum = 96;BA.debugLine="Pressed = False";
_pressed = __c.False;
//BA.debugLineNum = 97;BA.debugLine="RaiseTouchStateEvent";
_raisetouchstateevent();
};
//BA.debugLineNum = 99;BA.debugLine="Update";
_update();
//BA.debugLineNum = 100;BA.debugLine="End Sub";
return "";
}
}
public String _update() throws Exception{
int _s1 = 0;
int _y = 0;
int _x = 0;
//BA.debugLineNum = 61;BA.debugLine="Public Sub Update";
//BA.debugLineNum = 63;BA.debugLine="cvs.ClearRect(cvs.TargetRect)";
_cvs.ClearRect(_cvs.getTargetRect());
//BA.debugLineNum = 64;BA.debugLine="If size > 0 Then";
if (_size>0) {
//BA.debugLineNum = 65;BA.debugLine="If Vertical = False Then";
if (_vertical==__c.False) {
//BA.debugLineNum = 66;BA.debugLine="Dim s1 As Int = Radius2 + (mValue - MinValue) /";
_s1 = (int) (_radius2+(_mvalue-_minvalue)/(double)(_maxvalue-_minvalue)*_size);
//BA.debugLineNum = 67;BA.debugLine="Dim y As Int = mBase.Height / 2";
_y = (int) (_mbase.getHeight()/(double)2);
//BA.debugLineNum = 68;BA.debugLine="cvs.DrawLine(Radius2, y, s1, y, Color1, Size1)";
_cvs.DrawLine((float) (_radius2),(float) (_y),(float) (_s1),(float) (_y),_color1,(float) (_size1));
//BA.debugLineNum = 69;BA.debugLine="cvs.DrawLine(s1, y, mBase.Width - Radius2, y, C";
_cvs.DrawLine((float) (_s1),(float) (_y),(float) (_mbase.getWidth()-_radius2),(float) (_y),_color2,(float) (_size2));
//BA.debugLineNum = 70;BA.debugLine="cvs.DrawCircle(s1, y, Radius1, Color1, True, 0)";
_cvs.DrawCircle((float) (_s1),(float) (_y),(float) (_radius1),_color1,__c.True,(float) (0));
//BA.debugLineNum = 71;BA.debugLine="If Pressed Then";
if (_pressed) {
//BA.debugLineNum = 72;BA.debugLine="cvs.DrawCircle(s1, y, Radius2, ThumbColor, Tru";
_cvs.DrawCircle((float) (_s1),(float) (_y),(float) (_radius2),_thumbcolor,__c.True,(float) (0));
};
}else {
//BA.debugLineNum = 75;BA.debugLine="Dim s1 As Int = Radius2 + (MaxValue - mValue) /";
_s1 = (int) (_radius2+(_maxvalue-_mvalue)/(double)(_maxvalue-_minvalue)*_size);
//BA.debugLineNum = 76;BA.debugLine="Dim x As Int = mBase.Width / 2";
_x = (int) (_mbase.getWidth()/(double)2);
//BA.debugLineNum = 77;BA.debugLine="cvs.DrawLine(x, Radius2, x, s1, Color2, Size2)";
_cvs.DrawLine((float) (_x),(float) (_radius2),(float) (_x),(float) (_s1),_color2,(float) (_size2));
//BA.debugLineNum = 78;BA.debugLine="cvs.DrawLine(x, s1, x, mBase.Height - Radius2,";
_cvs.DrawLine((float) (_x),(float) (_s1),(float) (_x),(float) (_mbase.getHeight()-_radius2),_color1,(float) (_size1));
//BA.debugLineNum = 79;BA.debugLine="cvs.DrawCircle(x, s1, Radius1, Color1, True, 0)";
_cvs.DrawCircle((float) (_x),(float) (_s1),(float) (_radius1),_color1,__c.True,(float) (0));
//BA.debugLineNum = 80;BA.debugLine="If Pressed Then";
if (_pressed) {
//BA.debugLineNum = 81;BA.debugLine="cvs.DrawCircle(x, s1, Radius2, ThumbColor, Tru";
_cvs.DrawCircle((float) (_x),(float) (_s1),(float) (_radius2),_thumbcolor,__c.True,(float) (0));
};
};
};
//BA.debugLineNum = 85;BA.debugLine="cvs.Invalidate";
_cvs.Invalidate();
//BA.debugLineNum = 86;BA.debugLine="End Sub";
return "";
}
public Object callSub(String sub, Object sender, Object[] args) throws Exception {
BA.senderHolder.set(sender);
return BA.SubDelegator.SubNotFound;
}
}