mirror of
https://github.com/KeymonSoft/Medicomed_Preventa.git
synced 2026-04-25 16:40:07 +00:00
v: 5.10.24
Se hicieron invisibles normales de la venta, se agregaron 2 botones mas, uno indica que tieene venta y el otro que no tiene, tambien al boton que indica que tiene venta se le agrega una pequeña ventana para agregar la venta que se le indique.
This commit is contained in:
IsR0d
443
B4A/Objects/src/keymon/lat/medicomed/b4xseekbar.java
Normal file
443
B4A/Objects/src/keymon/lat/medicomed/b4xseekbar.java
Normal file
@@ -0,0 +1,443 @@
|
||||
package keymon.lat.medicomed;
|
||||
|
||||
|
||||
import anywheresoftware.b4a.BA;
|
||||
import anywheresoftware.b4a.B4AClass;
|
||||
import anywheresoftware.b4a.BALayout;
|
||||
import anywheresoftware.b4a.debug.*;
|
||||
|
||||
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");
|
||||
if (htSubs == null) {
|
||||
ba.loadHtSubs(this.getClass());
|
||||
htSubs = ba.htSubs;
|
||||
}
|
||||
|
||||
}
|
||||
if (BA.isShellModeRuntimeCheck(ba))
|
||||
this.getClass().getMethod("_class_globals", keymon.lat.medicomed.b4xseekbar.class).invoke(this, new Object[] {null});
|
||||
else
|
||||
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 String _meventname = "";
|
||||
public Object _mcallback = null;
|
||||
public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null;
|
||||
public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null;
|
||||
public int _color1 = 0;
|
||||
public int _color2 = 0;
|
||||
public int _thumbcolor = 0;
|
||||
public anywheresoftware.b4a.objects.B4XCanvas _cvs = null;
|
||||
public Object _tag = null;
|
||||
public anywheresoftware.b4a.objects.B4XViewWrapper _touchpanel = null;
|
||||
public int _mvalue = 0;
|
||||
public int _minvalue = 0;
|
||||
public int _maxvalue = 0;
|
||||
public int _interval = 0;
|
||||
public boolean _vertical = false;
|
||||
public int _size1 = 0;
|
||||
public int _size2 = 0;
|
||||
public int _radius1 = 0;
|
||||
public int _radius2 = 0;
|
||||
public boolean _pressed = false;
|
||||
public int _size = 0;
|
||||
public b4a.example.dateutils _dateutils = null;
|
||||
public keymon.lat.medicomed.main _main = null;
|
||||
public keymon.lat.medicomed.starter _starter = null;
|
||||
public keymon.lat.medicomed.subs _subs = null;
|
||||
public keymon.lat.medicomed.appupdater _appupdater = null;
|
||||
public keymon.lat.medicomed.mapa_rutas _mapa_rutas = null;
|
||||
public keymon.lat.medicomed.tracker _tracker = null;
|
||||
public keymon.lat.medicomed.newinst2 _newinst2 = null;
|
||||
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";
|
||||
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";
|
||||
_meventname = "";
|
||||
RDebugUtils.currentLine=59375618;
|
||||
//BA.debugLineNum = 59375618;BA.debugLine="Private mCallBack As Object 'ignore";
|
||||
_mcallback = new Object();
|
||||
RDebugUtils.currentLine=59375619;
|
||||
//BA.debugLineNum = 59375619;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";
|
||||
_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI();
|
||||
RDebugUtils.currentLine=59375621;
|
||||
//BA.debugLineNum = 59375621;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";
|
||||
_cvs = new anywheresoftware.b4a.objects.B4XCanvas();
|
||||
RDebugUtils.currentLine=59375623;
|
||||
//BA.debugLineNum = 59375623;BA.debugLine="Public Tag As Object";
|
||||
_tag = new Object();
|
||||
RDebugUtils.currentLine=59375624;
|
||||
//BA.debugLineNum = 59375624;BA.debugLine="Private TouchPanel As B4XView";
|
||||
_touchpanel = new anywheresoftware.b4a.objects.B4XViewWrapper();
|
||||
RDebugUtils.currentLine=59375625;
|
||||
//BA.debugLineNum = 59375625;BA.debugLine="Private mValue As Int";
|
||||
_mvalue = 0;
|
||||
RDebugUtils.currentLine=59375626;
|
||||
//BA.debugLineNum = 59375626;BA.debugLine="Public MinValue, MaxValue As Int";
|
||||
_minvalue = 0;
|
||||
_maxvalue = 0;
|
||||
RDebugUtils.currentLine=59375627;
|
||||
//BA.debugLineNum = 59375627;BA.debugLine="Public Interval As Int = 1";
|
||||
_interval = (int) (1);
|
||||
RDebugUtils.currentLine=59375628;
|
||||
//BA.debugLineNum = 59375628;BA.debugLine="Private Vertical As Boolean";
|
||||
_vertical = false;
|
||||
RDebugUtils.currentLine=59375629;
|
||||
//BA.debugLineNum = 59375629;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";
|
||||
_pressed = false;
|
||||
RDebugUtils.currentLine=59375631;
|
||||
//BA.debugLineNum = 59375631;BA.debugLine="Private size As Int";
|
||||
_size = 0;
|
||||
RDebugUtils.currentLine=59375632;
|
||||
//BA.debugLineNum = 59375632;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";
|
||||
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";
|
||||
return 0;
|
||||
}
|
||||
public String _initialize(keymon.lat.medicomed.b4xseekbar __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{
|
||||
__ref = this;
|
||||
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";
|
||||
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*/ ));
|
||||
};
|
||||
RDebugUtils.currentLine=59768836;
|
||||
//BA.debugLineNum = 59768836;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}));}
|
||||
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";
|
||||
_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*/ );
|
||||
}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*/ );
|
||||
};
|
||||
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*/ ));
|
||||
};
|
||||
};
|
||||
RDebugUtils.currentLine=59834383;
|
||||
//BA.debugLineNum = 59834383;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";
|
||||
return "";
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user