Bonsoir,
Je te remercie pour toutes ces informations.
Je sors mon chien et à mon retour me penche avec attention sur le bout de
code que tu as laissé.
Les deux questions à la fin de mon précédent message concernent deux projets
distincts.
Le problème de tabulation avec editorgadget concerne un programme "cahier de
texte" celui-là même pour lequel je souhaiterais une revue de code.
Et le second, la réécriture de mon programme de loto n'a pas encore été
commencé.
Encore merci.
Jérôme

-----Message d'origine-----
De : [email protected] [mailto:[email protected]] De la
part de LavaChri
Envoyé : vendredi 9 novembre 2012 19:21
À : [email protected]
Objet : [progliste] Re: purebasic

Slt,
Sans jugement de valeur sur son œuvre, j'avais survolé les cours de
Boulanger et il ne t'apporteront rien pour ce que tu demandes, car il
n'avait abordé que le mode console de PB.

Pour pouvoir sortir d'un editorgadget il faut soit utilise le flag
#Pb_EditorGadget_ReadOnly mais cela ne va pas t'arranger, soit utiliser une
CallBack d'événement et intercepter la touche TAB pour lui faire faire ce
que tu veux...

Mais bon, je v pas te décourager de suite, en fait l'éditorgadget n'est pas
adapté pour faire ce que tu veux.
En fait il faudrait que tu utilise un StringGadget(), tu pourras même le
réduire à ne recevoir que des chiffres, #Pb_String_Numeric, et tu pourras
bien tabuler.

Je penses que tu veux parler de la notion de  controle utilisateur en VB.
Cela n'existe pas vraiment en PB, mais bon cela ne sera pas plus compliqué
de toute façons.
Il y a plusieurs méthode mais en voila une abordable. Tu fais F1 sur les
mot-clé que tu ne connais pas.


#NBCase = 15

  Procedure fill(Array A.l(1) )

    For i = 1 To #NbCase

      SetGadgetText( I, Str( A(I) ) )

    Next i

  EndProcedure

 
  Global Dim MaGrille.l(#NbCase)

  MaGrille(1) = 14

  MaGrille(2) = 2

 
  If OpenWindow(0, 0, 0, 322, 205, "Les options de StringGadget",
#PB_Window_SystemMenu | #PB_Window_ScreenCentered)

    For i = 1 To #NBCase

      StringGadget( I, 5, 25*I, 50, 20, "", #PB_String_Numeric)

    Next i

    Fill( MaGrille() )

    Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow

EndIf


Progliste :
Pour se désinscrire de la liste :
mailto:[email protected]?subject=unsubscribe

Pour voir les archives de la liste :
http://www.mail-archive.com/[email protected]/       

Je vous rappelle que les pièces jointe sont activés leur taille est limité à
2 MO 

Pour accéder aux fichiers de la liste
http://outils.archive-host.com/partage.php?id=2Qar9Hy6ftzr
Ou en utilisant la nouvelle page de partage :
http://outils-n.archive-host.com/partage-fm0m7b947vglikp9Efpso94gt
Pour y ajouter des fichiers demandez-moi le ou sur la liste ou en privé, je
vous répondrez en privé.
        
        

Progliste :
Pour se désinscrire de la liste : 
mailto:[email protected]?subject=unsubscribe

Pour voir les archives de la liste :
http://www.mail-archive.com/[email protected]/       

Je vous rappelle que les pièces jointe sont activés leur taille est limité à 2 
MO 

Pour accéder aux fichiers de la liste
http://outils.archive-host.com/partage.php?id=2Qar9Hy6ftzr
Ou en utilisant la nouvelle page de partage :
http://outils-n.archive-host.com/partage-fm0m7b947vglikp9Efpso94gt
Pour y ajouter des fichiers demandez-moi le ou sur la liste ou en privé, je 
vous répondrez en privé.
        
        

Répondre à