French champ de textes

fgh3966

Active Member
Licensed User
Bonsoir

je voudrais faire un champ de textes comme dans un terminal, bref récupérer et afficher des informations en provenances d'évenements (click_boutons) ou du port série, aussi ce serait bien qu'il y ait des ascenseurs, que les caractères puissent être affichés a la suite sans limite et qu'on puisse sélectionner des caractères pour les copier dans un fichier texte. Bref comme dans les logiciels : hyperterminal, putty, etc ...

Je recherche des exemples simples, et je regarde pour les fonctions : editText ou bien B4XFloatTextField, peut être y a t-il une fonction plus adapté ?

Plus tard il faudrait que je convertisse et manipules ces infos.

Je recherche un exemple simple pour m'exercer avec.

Merci d'avance.
 

toby

Well-Known Member
Licensed User
Longtime User
Voici un exemple simple qui pourrait vous aider.

B4X:
'This event will be called once, before the page becomes visible.
Private Sub B4XPage_Created (Root1 As B4XView)
    Root = Root1
    Root.LoadLayout("MainPage")
    Dim i As Int=1
    
    For i=1 To 10
        CustomListView1.AddTextItem($"L'objet ${i}"$, i)   
    Next
End Sub

'You can see the list of page related events in the B4XPagesManager object. The event name is B4XPage.

Private Sub Button1_Click
    'xui.MsgboxAsync("Hello world!", "B4X")
    CustomListView1.InsertAtTextItem(0, $"bouton cliqué ${Button1.Tag}"$, Button1.Tag)
End Sub
champ de texte.jpg
 

Attachments

  • Project.zip
    14.3 KB · Views: 71

fgh3966

Active Member
Licensed User
Merci pour l'exemple hélas le projet ne se compile pas, la barre devient rouge et la fenêtre de compilation marque :
B4A Version : 12.20
Analyse du code. (0.04s)
Java Version : 11
Building folders structure. (0.03s)
Exécution d'une action personnalisée. Error


sinon dans mon code j'ai déclaré un edittext et deux variables string

j'ai écris ça

edittext:
    caractdeb = BV0
    caractadd = caractdeb + 1
    TextEdit.Text = caractdeb &caractadd


Il faudrait que pour un évènement les caractères s'ajoutent a la suite, comme un éditeur classique, terminal, etc ...

je cherche un exemple
 

klaus

Expert
Licensed User
Longtime User
Moi, j'utiliserais un EditText.
Qui permet de manipuler du texte ajouter supprimer etc.
On peut sélectionner du texte et l'enregistrer dans un fichier puis de l'ajouter à la fin du texte.
Ci-joint un petit projet de démonstration.

Ma version B4A est 12.50, pas 12.20, ce qui pourrait être la raison pour laquelle elle n'a pas pu être compilé
Il fonctionne aussi avec B4A version 12.20, j'ai vérifié.
Le problème vient peut-être du fait que le projet s'appelle B4X Example / b4x.example.
j'ai écris ça

B4X:
caractdeb = BV0
caractadd = caractdeb + 1
TextEdit.Text = caractdeb &caractadd
Que représente BV0 ?
Que représente caractdeb ?
Qu'est censée faire cette ligne caractadd = caractdeb + 1 ?
Si caractadd et caractdeb sont des variables String comment peur-on y ajouter le chiffre 1 ???
 

Attachments

  • EditTextTest.zip
    9.6 KB · Views: 65

fgh3966

Active Member
Licensed User
merci de vos rapides réponses

en effet caractdeb + 1 est une erreur de ma part

Je regarde le zip, merci
 

fgh3966

Active Member
Licensed User
Super ! 😀
je vais regarder comment faire disparaitre le clavier virtuel puis rajouter un bouton pour le retour à la ligne.
Merci.
 
Top