Fontrequest ... coment recup les effect

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
scaraber
Messages : 362
Inscription : ven. 15/juil./2005 17:32

Fontrequest ... coment recup les effect

Message par scaraber »

Salut
je voudriat savoir comment recup les effect de FontRequest ()
voila tout
merci davance de votre aide
a+
scaraber
Avatar de l’utilisateur
Flype
Messages : 2431
Inscription : jeu. 29/janv./2004 0:26
Localisation : Nantes

Message par Flype »

hey je t'en veux pas mais franchement as tu lu la doc au moins ?
Les fonctions SelectedFontColor(), SelectedFontName() et SelectedFontSize() peuvent être utilisées après un appel réussi à cette fonction pour obtenir les informations sur la police sélectionnée.
Image
scaraber
Messages : 362
Inscription : ven. 15/juil./2005 17:32

Message par scaraber »

je sais lire mais pour recup les effet car la je recup Le non de police la taille la couleur et avec SelectedFontStyle() le style mais coment faire pour les efet (baré/souligner)
Avatar de l’utilisateur
Droopy
Messages : 1151
Inscription : lun. 19/juil./2004 22:31

Message par Droopy »

Avatar de l’utilisateur
Flype
Messages : 2431
Inscription : jeu. 29/janv./2004 0:26
Localisation : Nantes

Message par Flype »

les examples pointés par droopy montrent comment faire un super FontRequester() c'est vrai.

mais bon dans ma doc PB4.0, l'example fournit montre comment récupéré les effets justement :

Code : Tout sélectionner

FontName$ = "Arial"
FontSize  = 14

Result = FontRequester(FontName$, FontSize, #PB_FontRequester_Effects, #Red)

If Result
  
  Message$ = "You have selected following font:"  + #LF$ 
  Message$ + "Name:  " + SelectedFontName()       + #LF$
  Message$ + "Size:  " + Str(SelectedFontSize())  + #LF$
  Message$ + "Color: " + Str(SelectedFontColor()) + #LF$
  
  If SelectedFontStyle() & #PB_Font_Bold
    Message$ + "Bold" + #LF$
  EndIf
  
  If SelectedFontStyle() & #PB_Font_StrikeOut
    Message$ + "StrikeOut" + #LF$
  EndIf
  
  If SelectedFontStyle() & #PB_Font_Underline
    Message$ + "Underline" + #LF$
  EndIf
  
Else 
  
  Message$ = "The requester was canceled."
  
EndIf

MessageRequester("FontRequester", Message$, #PB_MessageRequester_Ok)
mais peut etre es-tu sous PB3.94 (?)
Image
Répondre