HyperLinkGadget()

Syntaxe

Resultat = HyperLinkGadget(#Gadget, x, y, Largeur, Hauteur, Texte$, Couleur [, Options])

Crée un lien cliquable, similaire à ceux que l'on trouve sur les pages web dans la GadgetList courante. La couleur du texte ainsi que le pointeur de la souris changent automatiquement au passage de la souris sur ce gadget. Pour avoir un lien souligné, il suffit d'utiliser une police soulignée avec SetGadgetFont() une fois que le gadget a été créé. Si #PB_Any est utilisé pour le paramètre '#Gadget', le numéro du nouveau gadget sera renvoyé dans 'Resultat'.

Le texte peut être manipulé à l'aide des commandes SetGadgetText() et GetGadgetText().

Le paramètre facultatif 'Options' peut prendre l'une des valeurs suivantes:

  #PB_Hyperlink_Underline: Affiche une ligne en dessous du texte sans avoir à utiliser une police soulignée.

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

Ce gadget supporte les commandes SetGadgetColor() et GetGadgetColor() avec la constante #PB_Gadget_FrontColor pour changer la couleur du texte. La couleur de fond est toujours la couleur de la fenêtre.

Exemple:

  If OpenWindow(0,0,0,270,160,"HyperLinkGadget",#PB_Window_SystemMenu|#PB_Window_ScreenCentered) And CreateGadgetList(WindowID(0))
    HyperLinkGadget(0, 10, 10,250,20,"Lien rouge", RGB(255,0,0))
    HyperLinkGadget(1, 10, 30,250,20,"Lien vert souligné (Police Arial)", RGB(0,255,0), #PB_Font_Underline)
    SetGadgetFont(1, LoadFont(0, "Arial", 12))
    Repeat : Until WaitWindowEvent()=#PB_Event_CloseWindow
  EndIf

OS Supportés

Tous