Search this site
Embedded Files
Mon BBC SDL pas à pas
  • Accueil
  • BBC BASIC
  • BBC OS
  • BBC MODULES
  • RUBRIQUES
  • LIENS
Mon BBC SDL pas à pas
  • Accueil
  • BBC BASIC
  • BBC OS
  • BBC MODULES
  • RUBRIQUES
  • LIENS
  • More
    • Accueil
    • BBC BASIC
    • BBC OS
    • BBC MODULES
    • RUBRIQUES
    • LIENS

⇨ MENU ⇨ BIBLIOTHEQUE ⇨ editbox.bbc

PROC_editboxedit()

DESCRIPTION.


La procédure PROC_editboxedit() permet d'utiliser manuellement un code d'édition, ou raccourci clavier, obtenu habituellement par une combinaison de touches du clavier, dans un éditeur de texte multiligne.




SYNTAXE.


PROC_editboxedit( boite , editeur , code )




REMARQUES.


boite doit être l'identifiant de la boite de dialogue qui accueillera l'éditeur de texte. Il s'agit du nom de la variable qui a reçu la valeur retournée par la fonction FN_newdialog() du module dlglib.bbc pour la création de boite.


editeur doit être l'identifiant de l'éditeur de texte multilignes qui sera associé a tableau.


code doit être un nombre entier correspondant au code de la combinaison de touches, ou raccourci clavier, permettant d’effectuer l’opération d'édition attendu. code peut valoir :

- 1, tout sélectionner ( Ctrl+A ) ;

- 2, gras / arrière (selon app) ( Ctrl+B ) ;

- 3, copier ( Ctrl+C ) ;

- 4, dupliquer / supprimer ( Ctrl+D ) ;

- 5, centrer / rechercher ( Ctrl+E ) ;

- 6, rechercher ( Ctrl+F ) ;

- 7, atteindre / groupe ( Ctrl+G ) ;

- 8, remplacer / retour arrière ( Ctrl+H ) ;

- 9, italique / tabulation ( Ctrl+I ) ;

- 10, justifier / saut de ligne ( Ctrl+J ) ;

- 11, lien / couper ligne ( Ctrl+K ) ;

- 12, aligner à gauche ( Ctrl+L ) ;

- 13, nouvelle ligne / retour chariot ( Ctrl+M ) ;

- 14, nouveau ( Ctrl+N ) ;

- 15, ouvrir ( Ctrl+O ) ;

- 16, imprimer ( Ctrl+P ) ;

- 17, quitter ( Ctrl+Q ) ;

- 18, actualiser / aligner droite ( Ctrl+R ) ;

- 19, sauvegarder ( Ctrl+S ) ;

- 20, nouvel onglet ( Ctrl+T ) ;

- 21, souligner ( Ctrl+U ) ;

- 22, coller ( Ctrl+V ) ;

- 23, fermer ( Ctrl+W ) ;

- 24, couper ( Ctrl+X ) ;

- 25, rétablir ( Ctrl+Y ) ;

- 26, annuler ( Ctrl+Z ).


Note : Bien qu'en général, code correspond aux codes ASCII de 0 à 31, son action exacte peut différer selon le système de la machiine de l'utilisateur.



Rappel : Les éditeurs de texte multiligne, créer avec le module editbox.bbc, devant être accueillis dans une boite de dialogue, il faut impérativement installer le module dlglib.bbc avant le module module editbox.bbc.



La procédure PROC_editboxedit() est importée depuis la module editbox.bbc. 




EXEMPLE.


REM --- Importation des modules ---

REM --- Module de la bibliothèque BBC BASIC ---

INSTALL @lib$ + "dlglib.bbc"

INSTALL @lib$ + "editbox.bbc"



REM --- Chargement de la police de caracteres par defaut ---

OSCLI "FONT """ + @lib$ + "DejaVuSans"",12" 


REM --- Initialisation des elements de la liste ---

DIM LST_Editeur$( 100 )

LST_Editeur$( 0 ) = "Vous pouvez entrer du texte a partir d'ici ..."

FOR kindex = 1 TO 9 : LST_Editeur$( kindex ) = "Ligne " +  STR$( kindex ) : NEXT kindex 

LST_Editeur$( 10 ) = "C'est ici que ce termine l'editeur de texte."


REM --- Creation d'une boite de dialogue nommee DLG_Test de 160 x 60 unites intitulee Test ---

DLG_Test = FN_newdialog( "Test ..." , 170 , 150 )


REM --- Creation des controles de la boite de dialogue ---

PROC_button( DLG_Test , "Fermer." , 8 , 115 , 130 , 40 , 15 , 0 )

PROC_button( DLG_Test , "Tout" , FN_setproc( PROC_Action() ) , 5 , 130 , 60 , 15 , 0 )

PROC_editbox( DLG_Test , "" , 101 , 5 , 5 , 160 , 120 , &300000 ) 

PROC_seteditboxarray( DLG_Test , 101 , LST_Editeur$() , 10 )


REM --- Affichage de la boite de dialogue et attende des choix de l'utilisateur ---

kcontrole = FN_showdialog( DLG_Test , &FFFFFFFF80000000 , &FFFFFFFF80000000 )  


REM --- Fermeture de la boite de dialogue ---

PROC_closedialog( DLG_Test ) 


REM --- Fin du programme ---

PRINT : PRINT "Au revoir."

END



REM --- DEFINITION DES METHODES PERSONNALISEES ---


REM --- Procedures d'appel de la boite de dialogue DLG_Test ---

DEF PROC_Action( Qboite , Qbouton ) : 

kinituler$ = FN_getdlgitemtext( Qboite , Qbouton )

IF kinituler$ = "Tout" THEN 

PROC_setdlgitemtext( Qboite , Qbouton ,"Rien" )

PROC_editboxedit( Qboite , 101 , 1 )

ELSE

PROC_setdlgitemtext( Qboite , Qbouton ,"Tout" )

PROC_editboxedit( Qboite , 101 , 26 )

ENDIF

ENDPROC


Votre aide est précieuse pour améliorer ce site, alors n'hésitez pas à faire part de

vos remarques, vos commentaires et de vos suggestions.

Dans la RETROGICIEL vous trouvez des suggestions simples et classiques pour

TESTER - DÉCOUVRIR - PRATIQUER - APPROFONDIR - EXPLORER

avec un exemple de résolution à télécharger pour vous inspirer.

Google Sites
Report abuse
Page details
Page updated
Google Sites
Report abuse