Lamw(solved) - Strange behavior

[marcos-ebm]

[using the translator]

when creating the second form using the command

Code: Pascal  [Select][+][-]

1.    
2.     if AndroidModule2 = nil then
3.     begin
4.         gApp.CreateForm(TAndroidModule2, AndroidModule2);
5.         AndroidModule2.Init;
6.     end;
7.     AndroidModule2.Show;
8.  

the second form is appearing with the components of the first form, that is, the second form appears with the button from the first form

Has anyone ever experienced this?

[vangli]

How is TAndroidModule2 defined?

[marcos-ebm]

How is TAndroidModule2 defined?

within a button click, but I've already tried adding activityCreate, JNIPrompt, but the behavior is always the same

[vangli]

Pls show code of class definition?

Edited: And think about inheritanse.

[c4p]

I would define the creation of the second form in event OnJNIPrompt of AndroidModule1 then call your second form show from a button click event in AndroidModule1.
This creates the second form on start, allowing you to then to show the second form from your button without issue.

Code: Pascal  [Select][+][-]

1. procedure AndroidModule1.AndroidModule1JNIPrompt(Sender: TObject);
2. begin  
3.   if AndroidModule2 = nil then
4.     begin
5.         gApp.CreateForm(TAndroidModule2, AndroidModule2);
6.         AndroidModule2.Init;
7.     end;
8. end;

Code: Pascal  [Select][+][-]

1. procedure AndroidModule1.Button1Click(Sender: TObject);
2. begin  
3.     AndroidModule2.Show;
4. end;

[marcos-ebm]

Pls show code of class definition?

Edited: And think about inheritanse.

ok, When I get home I'll post it

I would define the creation of the second form in event OnJNIPrompt of AndroidModule1 then call your second form show from a button click event in AndroidModule1.
This creates the second form on start, allowing you to then to show the second form from your button without issue.

Code: Pascal  [Select][+][-]

1. procedure AndroidModule1.AndroidModule1JNIPrompt(Sender: TObject);
2. begin  
3.   if AndroidModule2 = nil then
4.     begin
5.         gApp.CreateForm(TAndroidModule2, AndroidModule2);
6.         AndroidModule2.Init;
7.     end;
8. end;

Code: Pascal  [Select][+][-]

1. procedure AndroidModule1.Button1Click(Sender: TObject);
2. begin  
3.     AndroidModule2.Show;
4. end;

I've done it the same way as you, but the behavior remains the same

[dseligo]

the second form is appearing with the components of the first form, that is, the second form appears with the button from the first form

Choose some background color for second form (change Background property of form). If you leave it at default, Android considers background as transparent and shows previous form underneath.

[c4p]

Also try calling below before showing the form in case it's a Z-order visibility issue.

Code: Pascal  [Select][+][-]

1. AndroidModule2.MoveTaskToFront;

The post below regarding background/transparency of the AndroidModule2 form is a good call and worth checking too.

the second form is appearing with the components of the first form, that is, the second form appears with the button from the first form

Choose some background color for second form (change Background property of form). If you leave it at default, Android considers background as transparent and shows previous form underneath.

[marcos-ebm]

Guys, I would like to thank everyone for their help

vangli
c4p
dseligo

The problem was solved thanks to dseligo's tip, thank you very much

[c4p]

Good shout @dseligo