EditorGadget()

Syntaxe

Resultat = EditorGadget(#Gadget, x, y, Largeur, Hauteur [, Options])

Crée un #Gadget de type 'editeur' permettant de saisie une grande quantité de texte dans la 'GadgetList' courante. Si #PB_Any est utilisé pour le paramètre '#Gadget', le numéro du nouveau gadget sera renvoyé dans 'Resultat'. Les paramètres 'x' et 'y' représentent la position du gadget, 'Largeur' et 'Hauteur', ses dimensions. #Gadget sera le numéro retourné par la fonction EventGadget().

Le paramètre facultatif 'Options' peut prendre la valeur suivante:

  #PB_Editor_ReadOnly: L'utilisateur ne peut pas éditer le texte dans ce gadget.

Vous pouvez ajouter une 'mini aide' à ce gadget en utilisant GadgetToolTip().

Les commandes suivantes peuvent être utilisées pour agir sur le contenu du gadget:

- AddGadgetItem(): Ajoute une ligne de texte
- CountGadgetItems(): Renvoie le nombre de lignes contenues dans le gadget.
- GetGadgetItemText(): Renvoie la ligne de texte spécifié
- GetGadgetText(): Renvoie tout le texte contenu dans le gadget
- RemoveGadgetItem(): Efface la ligne spécifiée
- ClearGadgetItemList(): Efface tout le texte
- SetGadgetItemText(): Change le contenu de la ligne spécifiée
- SetGadgetText(): Remplace tout le texte contenu par le gadget par un autre
- SetGadgetAttribute() avec l'attribut suivant:

  #PB_Editor_ReadOnly: Change l'état 'lecture seule' du gadget (0 = éditable, 1 = non éditable).

- GetGadgetAttribute() avec l'attribut suivant:

  #PB_Editor_ReadOnly: Renvoie l'état 'lecture seule' du gadget (0 = éditable, 1 = non éditable).

Ce gadget supporte les commandes SetGadgetColor() et GetGadgetColor() avec les valeurs 'TypeCouleur' suivantes:

  #PB_Gadget_BackColor : Couleur de fond
  #PB_Gadget_FrontColor: Couleur du texte

Exemple:

  If OpenWindow(0, 0, 0, 322, 150, "EditorGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) And CreateGadgetList(WindowID(0)) 
    EditorGadget(0, 8, 8, 306, 133) 
    For a = 0 To 5 
      AddGadgetItem(0, a, "Ligne "+Str(a)) 
    Next 
    Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow 
  EndIf 

OS Supportés

Tous