paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-25 04:39:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

Android: Updates the bindings file

Browse Source 
git-svn-id: trunk@31912 -
This commit is contained in:
sekelsenmat 2011-08-08 09:31:33 +00:00
parent cdbd6d7fc4
commit 5f0143992d
1 changed files with 19 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
lcl/interfaces/android/android_all.pas
View File

@ -11,7 +11,7 @@ type
TDisplayMetrics = class; TDisplayMetrics = class;
TDisplay = class; TDisplay = class;
TWindowManager = class; TWindowManager = class;
TLayoutParams = class; TViewGroup_LayoutParams = class;
TView = class; TView = class;
TViewGroup = class; TViewGroup = class;
TLinearLayout = class; TLinearLayout = class;
@ -54,14 +54,14 @@ type
function getDefaultDisplay(): TDisplay; function getDefaultDisplay(): TDisplay;
end; end;
TLayoutParams = class(TJavaObject) TViewGroup_LayoutParams = class(TJavaObject)
public public
constructor Create(); constructor Create(width: Integer; height: Integer);
end; end;
TView = class(TJavaObject) TView = class(TJavaObject)
public public
procedure setLayoutParams(var params: TLayoutParams); procedure setLayoutParams(var params: TViewGroup_LayoutParams);
procedure setVisibility(visibility: Integer); procedure setVisibility(visibility: Integer);
end; end;
@ -79,9 +79,9 @@ type
constructor Create(); constructor Create();
end; end;
TAbsoluteLayout_LayoutParams = class(TLayoutParams) TAbsoluteLayout_LayoutParams = class(TViewGroup_LayoutParams)
public public
constructor Create(); constructor Create(param_width: Integer; param_height: Integer; param_x: Integer; param_y: Integer);
end; end;
TTextView = class(TView) TTextView = class(TView)
@ -151,7 +151,7 @@ const
{ TDisplayMetrics } { TDisplayMetrics }
{ TDisplay } { TDisplay }
{ TWindowManager } { TWindowManager }
{ TLayoutParams } { TViewGroup_LayoutParams }
FILL_PARENT = $FFFFFFFF; FILL_PARENT = $FFFFFFFF;
{ TView } { TView }
VISIBLE = 0; VISIBLE = 0;
@ -187,8 +187,8 @@ const
amkUI_TDisplay_getMetrics = $00102000; amkUI_TDisplay_getMetrics = $00102000;
// TWindowManager // TWindowManager
amkUI_TWindowManager_getDefaultDisplay = $00103000; amkUI_TWindowManager_getDefaultDisplay = $00103000;
// TLayoutParams // TViewGroup_LayoutParams
amkUI_TLayoutParams_Create = $00104000; amkUI_TViewGroup_LayoutParams_Create = $00104000;
// TView // TView
amkUI_TView_setLayoutParams = $00105000; amkUI_TView_setLayoutParams = $00105000;
amkUI_TView_setVisibility = $00105001; amkUI_TView_setVisibility = $00105001;
@ -312,13 +312,15 @@ begin
Result := TDisplay(vAndroidPipesComm.WaitForIntReturn()); Result := TDisplay(vAndroidPipesComm.WaitForIntReturn());
end; end;
constructor TLayoutParams.Create(); constructor TViewGroup_LayoutParams.Create(width: Integer; height: Integer);
begin begin
vAndroidPipesComm.SendByte(ShortInt(amkUICommand)); vAndroidPipesComm.SendByte(ShortInt(amkUICommand));
vAndroidPipesComm.SendInt(amkUI_TLayoutParams_Create); vAndroidPipesComm.SendInt(amkUI_TViewGroup_LayoutParams_Create);
vAndroidPipesComm.SendInt(Integer(width));
vAndroidPipesComm.SendInt(Integer(height));
Index := vAndroidPipesComm.WaitForIntReturn(); Index := vAndroidPipesComm.WaitForIntReturn();
end; end;
procedure TView.setLayoutParams(var params: TLayoutParams); procedure TView.setLayoutParams(var params: TViewGroup_LayoutParams);
begin begin
vAndroidPipesComm.SendByte(ShortInt(amkUICommand)); vAndroidPipesComm.SendByte(ShortInt(amkUICommand));
vAndroidPipesComm.SendInt(amkUI_TView_setLayoutParams); vAndroidPipesComm.SendInt(amkUI_TView_setLayoutParams);
@ -348,10 +350,14 @@ begin
vAndroidPipesComm.SendInt(amkUI_TAbsoluteLayout_Create); vAndroidPipesComm.SendInt(amkUI_TAbsoluteLayout_Create);
Index := vAndroidPipesComm.WaitForIntReturn(); Index := vAndroidPipesComm.WaitForIntReturn();
end; end;
constructor TAbsoluteLayout_LayoutParams.Create(); constructor TAbsoluteLayout_LayoutParams.Create(param_width: Integer; param_height: Integer; param_x: Integer; param_y: Integer);
begin begin
vAndroidPipesComm.SendByte(ShortInt(amkUICommand)); vAndroidPipesComm.SendByte(ShortInt(amkUICommand));
vAndroidPipesComm.SendInt(amkUI_TAbsoluteLayout_LayoutParams_Create); vAndroidPipesComm.SendInt(amkUI_TAbsoluteLayout_LayoutParams_Create);
vAndroidPipesComm.SendInt(Integer(param_width));
vAndroidPipesComm.SendInt(Integer(param_height));
vAndroidPipesComm.SendInt(Integer(param_x));
vAndroidPipesComm.SendInt(Integer(param_y));
Index := vAndroidPipesComm.WaitForIntReturn(); Index := vAndroidPipesComm.WaitForIntReturn();
end; end;
constructor TTextView.Create(); constructor TTextView.Create();