Italian Aprire un form

kelvo01

Member
Licensed User
Sono un novizio, quale e' il comando per aprite dinamicamente un form (dinamico magari aprendolo per il max del dispositivo) )con dentro dei text input?
Cosa devo usare dei form dei panel ?
qualcuno mi linka 2 righe di codice?
Grazie
 

imgsimonebiliato

Well-Known Member
Licensed User
Ciao,
in allegato un progetto semplice con un pulsante che apre la seconda activity.

E BENVENUTO!! ;););)
 

Attachments

eurojam

Well-Known Member
Licensed User
Ciao,
fare un text input e molto facile con b4a: questo esempio ha una linea di input. La larghezza è dinamico
B4X:
Sub Activity_Create(FirstTime As Boolean)
    'Do not forget to load the layout file created with the visual designer. For example:
    'Activity.LoadLayout("Layout1")
 
    Activity.Color = Colors.Gray
    e.Initialize("Edittext1")
    Activity.AddView(e, 10dip,10dip,100%x-20dip,80dip)
    e.Color = Colors.white
    e.TextSize = 16
    e.TextColor = Colors.Black
End Sub
Sub EditText1_TextChanged (Old As String, New As String)
   Log ("questo è vecchio " & Old & " e questo è nouvo " & New)

End Sub
tanti saluti
stefan
 

kelvo01

Member
Licensed User
...
ListViewMain.AddSingleLine("Varie")
ListViewMain.AddTwoLinesAndBitmap("Settaggi", "Configura l'applicazione.", BitmapConfigura )

io questa listview posso aggiungere un input di un testo ?
tipo "percorso:" input valore ...
come?
 

imgsimonebiliato

Well-Known Member
Licensed User
grazie imgsimonebiliato, l'esempio fa proprio per me!
quindi i form si chiamano activity?
Si, proprio così..

...
ListViewMain.AddSingleLine("Varie")
ListViewMain.AddTwoLinesAndBitmap("Settaggi", "Configura l'applicazione.", BitmapConfigura )

io questa listview posso aggiungere un input di un testo ?
tipo "percorso:" input valore ...
come?
Non ho ben capito che vuoi fare..
Comunque guarda se ti aiuta questo:


B4X:
Dim percorso as string
Dim Id As InputDialog

Id.Show ( "", "input", "OK", "Annulla", "", Null )

If Id.Response = -3 Then
    Msgbox("Ho premuto annulla", "")
    Return
Else
    If Id.Input = "" Then
        Msgbox("vuoto", "")  
        Return
    End If
    percorso = id.input
    Msgbox(percorso, "valore inserito")
  
End If
Ricordati che devi inglobare la libreria Dialogs, se non ce l'hai già
 

kelvo01

Member
Licensed User
Intendevo per non tenere conto del layout del telefono uso la listview
come aggiungo dei testi con ListViewMain.AddTwoLinesAndBitmap
posto customizzare ed aggiungere un edittext o simile?
 

imgsimonebiliato

Well-Known Member
Licensed User
Non credo tu possa aggiungere un oggetto edittext alla listview
 
Top