You've already forked lazarus-ccr
androidlcl: Binding update
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1810 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -92,8 +92,18 @@ public class AndroidAll
|
|||||||
static final int amkUI_TCheckBox_Create = 0x00111000;
|
static final int amkUI_TCheckBox_Create = 0x00111000;
|
||||||
// AdapterView
|
// AdapterView
|
||||||
// AbsSpinner
|
// AbsSpinner
|
||||||
|
static final int amkUI_TAbsSpinner_getCount = 0x00113000;
|
||||||
|
static final int amkUI_TAbsSpinner_setAdapter = 0x00113001;
|
||||||
// Spinner
|
// Spinner
|
||||||
static final int amkUI_TSpinner_Create = 0x00114000;
|
static final int amkUI_TSpinner_Create = 0x00114000;
|
||||||
|
// Filterable
|
||||||
|
// Adapter
|
||||||
|
// ListAdapter
|
||||||
|
// SpinnerAdapter
|
||||||
|
// BaseAdapter
|
||||||
|
// ArrayAdapter<String>
|
||||||
|
static final int amkUI_TArrayAdapter_String__Create = 0x0011A000;
|
||||||
|
static final int amkUI_TArrayAdapter_String__add = 0x0011A001;
|
||||||
|
|
||||||
public boolean ProcessCommand(int Buffer)
|
public boolean ProcessCommand(int Buffer)
|
||||||
{
|
{
|
||||||
@ -114,10 +124,14 @@ public class AndroidAll
|
|||||||
DisplayMetrics param_self_DisplayMetrics;
|
DisplayMetrics param_self_DisplayMetrics;
|
||||||
CompoundButton param_self_CompoundButton;
|
CompoundButton param_self_CompoundButton;
|
||||||
WindowManager param_self_WindowManager;
|
WindowManager param_self_WindowManager;
|
||||||
|
AbsSpinner param_self_AbsSpinner;
|
||||||
|
ArrayAdapter<String> param_self_ArrayAdapter_String_;
|
||||||
// Params
|
// Params
|
||||||
ViewGroup.LayoutParams lViewGroup_LayoutParams_1, lViewGroup_LayoutParams_2;
|
ViewGroup.LayoutParams lViewGroup_LayoutParams_1, lViewGroup_LayoutParams_2;
|
||||||
|
SpinnerAdapter lSpinnerAdapter_1;
|
||||||
DisplayMetrics lDisplayMetrics_1;
|
DisplayMetrics lDisplayMetrics_1;
|
||||||
CharSequence lCharSequence_1;
|
CharSequence lCharSequence_1;
|
||||||
|
String lString_1;
|
||||||
View lView_1;
|
View lView_1;
|
||||||
int lint_1, lint_2, lint_3, lint_4;
|
int lint_1, lint_2, lint_3, lint_4;
|
||||||
float lfloat_1, lfloat_2;
|
float lfloat_1, lfloat_2;
|
||||||
@ -546,11 +560,54 @@ public class AndroidAll
|
|||||||
ViewElements.add(new CheckBox(activity));
|
ViewElements.add(new CheckBox(activity));
|
||||||
MyAndroidPipesComm.SendIntResult(ViewElements.size() - 1);
|
MyAndroidPipesComm.SendIntResult(ViewElements.size() - 1);
|
||||||
break;
|
break;
|
||||||
|
// method int getCount()
|
||||||
|
case amkUI_TAbsSpinner_getCount:
|
||||||
|
DebugOut("amkUI_TAbsSpinner_getCount");
|
||||||
|
// Self
|
||||||
|
lInt = MyAndroidPipesComm.GetInt();
|
||||||
|
param_self_AbsSpinner = (AbsSpinner) ViewElements.get(lInt);
|
||||||
|
// params
|
||||||
|
//
|
||||||
|
lResult_int = param_self_AbsSpinner.getCount();
|
||||||
|
MyAndroidPipesComm.SendIntResult(lResult_int);
|
||||||
|
break;
|
||||||
|
// method void setAdapter(SpinnerAdapter adapter)
|
||||||
|
case amkUI_TAbsSpinner_setAdapter:
|
||||||
|
DebugOut("amkUI_TAbsSpinner_setAdapter");
|
||||||
|
// Self
|
||||||
|
lInt = MyAndroidPipesComm.GetInt();
|
||||||
|
param_self_AbsSpinner = (AbsSpinner) ViewElements.get(lInt);
|
||||||
|
// params
|
||||||
|
lInt = MyAndroidPipesComm.GetInt();
|
||||||
|
lSpinnerAdapter_1 = (SpinnerAdapter) ViewElements.get(lInt);
|
||||||
|
//
|
||||||
|
param_self_AbsSpinner.setAdapter(lSpinnerAdapter_1);
|
||||||
|
MyAndroidPipesComm.SendResult();
|
||||||
|
break;
|
||||||
case amkUI_TSpinner_Create:
|
case amkUI_TSpinner_Create:
|
||||||
DebugOut("amkUI_TSpinner_Create");
|
DebugOut("amkUI_TSpinner_Create");
|
||||||
ViewElements.add(new Spinner(activity));
|
ViewElements.add(new Spinner(activity));
|
||||||
MyAndroidPipesComm.SendIntResult(ViewElements.size() - 1);
|
MyAndroidPipesComm.SendIntResult(ViewElements.size() - 1);
|
||||||
break;
|
break;
|
||||||
|
case amkUI_TArrayAdapter_String__Create:
|
||||||
|
DebugOut("amkUI_TArrayAdapter_String__Create");
|
||||||
|
lint_1 = MyAndroidPipesComm.GetInt();
|
||||||
|
ViewElements.add(new ArrayAdapter<String>(activity, lint_1));
|
||||||
|
MyAndroidPipesComm.SendIntResult(ViewElements.size() - 1);
|
||||||
|
break;
|
||||||
|
// method void add(String aobject)
|
||||||
|
case amkUI_TArrayAdapter_String__add:
|
||||||
|
DebugOut("amkUI_TArrayAdapter_String__add");
|
||||||
|
// Self
|
||||||
|
lInt = MyAndroidPipesComm.GetInt();
|
||||||
|
param_self_ArrayAdapter_String_ = (ArrayAdapter<String>) ViewElements.get(lInt);
|
||||||
|
// params
|
||||||
|
lInt = MyAndroidPipesComm.GetInt();
|
||||||
|
lString_1 = (String) MyJavaLang.LangElements.get(lInt);
|
||||||
|
//
|
||||||
|
param_self_ArrayAdapter_String_.add(lString_1);
|
||||||
|
MyAndroidPipesComm.SendResult();
|
||||||
|
break;
|
||||||
|
|
||||||
default:
|
default:
|
||||||
return false;
|
return false;
|
||||||
|
@ -1,7 +1,7 @@
|
|||||||
object Form2: TForm2
|
object Form2: TForm2
|
||||||
Left = 313
|
Left = 181
|
||||||
Height = 240
|
Height = 240
|
||||||
Top = 186
|
Top = 137
|
||||||
Width = 320
|
Width = 320
|
||||||
Caption = 'Form2'
|
Caption = 'Form2'
|
||||||
ClientHeight = 240
|
ClientHeight = 240
|
||||||
@ -16,17 +16,17 @@ object Form2: TForm2
|
|||||||
TabOrder = 0
|
TabOrder = 0
|
||||||
end
|
end
|
||||||
object CheckBox1: TCheckBox
|
object CheckBox1: TCheckBox
|
||||||
Left = 32
|
Left = 33
|
||||||
Height = 21
|
Height = 21
|
||||||
Top = 91
|
Top = 88
|
||||||
Width = 94
|
Width = 94
|
||||||
Caption = 'CheckBox1'
|
Caption = 'CheckBox1'
|
||||||
TabOrder = 1
|
TabOrder = 1
|
||||||
end
|
end
|
||||||
object Edit1: TEdit
|
object Edit1: TEdit
|
||||||
Left = 37
|
Left = 33
|
||||||
Height = 25
|
Height = 25
|
||||||
Top = 145
|
Top = 144
|
||||||
Width = 99
|
Width = 99
|
||||||
TabOrder = 2
|
TabOrder = 2
|
||||||
Text = 'Edit1'
|
Text = 'Edit1'
|
||||||
@ -45,6 +45,11 @@ object Form2: TForm2
|
|||||||
Top = 88
|
Top = 88
|
||||||
Width = 112
|
Width = 112
|
||||||
ItemHeight = 0
|
ItemHeight = 0
|
||||||
|
Items.Strings = (
|
||||||
|
'Item1'
|
||||||
|
'Item2'
|
||||||
|
'Item3'
|
||||||
|
)
|
||||||
TabOrder = 4
|
TabOrder = 4
|
||||||
Text = 'ComboBox1'
|
Text = 'ComboBox1'
|
||||||
end
|
end
|
||||||
|
Reference in New Issue
Block a user