Android Question display a button in several activities

[sultan87]

Hello,
I want to display a button in several activities. the click event is the same for all activities
how to do ?

 

[klaus]

What exactly do you want to achieve ?
You cannot have the same button on different activities.
You need one button per activity. In the Button_Click event in each activity you could call a routine in a code module.
But without knowing what exactly you need it's difficult to give a concrete advice.

 

[sultan87]

What exactly do you want to achieve ?
You cannot have the same button on different activities.
You need one button per activity. In the Button_Click event in each activity you could call a routine in a code module.
But without knowing what exactly you need it's difficult to give a concrete advice.

Thank's for your response
I have in every activity a button to exit the application (no activity.finish)
This button is always positioned in the same place and always the same event

 

[DonManfred]

This button is always positioned in the same place and always the same event

Then you need to add the button in the layout of each activity. And you need to create the same event-sub in each activity...

 

[sultan87]

Then you need to add the button in the layout of each activity. And you need to create the same event-sub in each activity...

hello,

Then you need to add the button in the layout of each activity. And you need to create the same event-sub in each activity...

I created a routine in a code Module
It's Ok
best regards

 

[klaus]

It would be easier to answer if you posted what you have done instead of letting us to expect to try to guess what you could have donne !

 

[sultan87]

It would be easier to answer if you posted what you have done instead of letting us to expect to try to guess what you could have donne !

Hello,
I'm sorry, here is the code used

Le module

Sub Pnl_Entete As Panel
  
    Dim Pnl As Panel
    Dim icon_gest_therm As ImageView  
    Dim lbl_titre As Label
    Dim icon_quitter_appli As ImageView
  
    Pnl.Initialize("")
    Pnl.Color = Colors.Transparent
  
    icon_gest_therm.Initialize("")
    icon_gest_therm.Bitmap = LoadBitmap(File.DirAssets,"icon_gest_therm.png")
    icon_gest_therm.Gravity = Gravity.FILL
    Pnl.AddView(icon_gest_therm,0,0,40*Main.Coeff_X,40*Main.Coeff_y)
  
    lbl_titre.Initialize("")
    lbl_titre.Text = "Gestion du Thermostat"
    lbl_titre.TextSize = 10
    lbl_titre.Gravity = Gravity.CENTER
    lbl_titre.Color=Colors.ARGB(0,0,255,0)
    lbl_titre.TextColor = Colors.Green
    Pnl.AddView(lbl_titre, 50*Main.Coeff_X, 0*Main.Coeff_Y, 100*Main.Coeff_X, 50*Main.Coeff_Y)

    icon_quitter_appli.Initialize("quitter_appli")
    icon_quitter_appli.Bitmap = LoadBitmap(File.DirAssets,"icon_quitter.png")
    icon_quitter_appli.Gravity = Gravity.FILL
    Pnl.AddView(icon_quitter_appli,420,0,40*Main.Coeff_X,40*Main.Coeff_y)  
  
    Return Pnl
      
End Sub

The Activity

Sub Activity_Resume
  
    If Main.Quit_Appli Then
        Activity.Finish
    End If

' Entète

    Activity.Color = Colors.Gray
  
    Activity.AddView(Sous_Prog.Pnl_Entete,0*Main.Coeff_X,0*Main.Coeff_y,480*Main.Coeff_X,50*Main.Coeff_y)

End Sub

Sub quitter_appli_click
  
   Dim Reponse As Int
  
   Reponse = Msgbox2("Voulez vous vraiment quitter la Gestion du Thermostat","Quitter","Oui","","Non",Null)  
   If Reponse = DialogResponse.Positive Then
     Main.Quit_Appli = True
     Activity.Finish
   End If
      
End Sub

Best regards

 

[klaus]

I'm a bit confuded, is your problem solved ?

 

[sultan87]

I'm a bit confuded, is your problem solved ?

hello,
you must not be confused, it's my fault
the problem is solved
thank's
best regards