French EditText Param New as String toujours vide

[patmaba]

Bonjour,

Je viens d'acheter un license entreprise et je fais joujou avec cet outil de dev android. C'est sympa.

Premiere exercice que je me suis fixé. C'est de créer un champ d'édition text et un bouton.

Le but est lorsque j'appuie sur le bouton celui-ci doit afficher le contenu du champ text.

Mon soucis est :
Lorsque j'afficher le MsgBox(EditText1.text) lors du button pressed, il n'affiche rien. C'est toujours vide comme si le champ EditText ne sauve pas ce que j'encode.

De plus, j'ai ajouté du Log sur l'evenement du champ TextChanged (Old As String, New As String) juste pour vérifier que l'info est catché par b4a.

Je constate que la valeur New est toujours vide. Par contre le paramètre Old m'affiche bien l'ancienne valeur.

Donc, je ne sais pas pourquoi la valeur que j'ai encodé dans le champ text n'est pas pris en compte.

Etant nouveau. Pouvez-vous m'aider à trouver mon erreur ?

Bien à vous

patmaba le nouveau

Un dernier point les sub ont été généré par le Designer en cochant Members du Layout.

 

[klaus]

Bienvenue dans ce forum.

Il serait plus facile de t'aider si tu postais ton projet en tant que fichier zip (Menu dans l'éditeur Files / Export As Zip).
Ou du moins inclure dans ta question le code source que tu utilises.
As-tu déjà lu ce thread Conseils pour débuter avec Basic4Android ?

Meilleures salutations.

 

[patmaba]

J'ai pas très bien compris l'erreur d'hier soir.

çà semble fonctionner et j'ai rien fait.

Je n'ai fait que lancdr à nouveau b4a et l'avd manager.

J'ai relancé le programme et tout fonctionne.

bizarre.

mon code

#Region  Project Attributes 
   #ApplicationLabel: B4A Example
   #VersionCode: 1
   #VersionName: 
   'SupportedOrientations possible values: unspecified, landscape or portrait.
   #SupportedOrientations: unspecified
   #CanInstallToExternalStorage: False
#End Region

#Region  Activity Attributes 
   #FullScreen: False
   #IncludeTitle: True
#End Region

Sub Process_Globals
   'These global variables will be declared once when the application starts.
   'These variables can be accessed from all modules.

End Sub

Sub Globals
    Dim EditText1 As EditText 'will hold a reference to the view added by the designer    
End Sub

Sub Activity_Create(FirstTime As Boolean)
    Activity.LoadLayout("Layout1") 'Load the layout file.
End Sub

Sub Button1_Click
    ToastMessageShow("ButtonPressed EditText1=" & EditText1.Text, False)
End Sub

Sub EditText1_TextChanged (Old As String, New As String)
   Log( "Old=" & Old )
   Log( "New=" & New )
End Sub
Sub EditText1_EnterPressed
   ToastMessageShow("Enter EditText1=" & EditText1.Text, False)
End Sub
Sub EditText1_FocusChanged (HasFocus As Boolean)
   
End Sub