Menu et Toolbar

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
Neosis
Messages : 113
Inscription : dim. 24/févr./2008 20:11

Menu et Toolbar

Message par Neosis »

Salut tous le monde :) ,
J'aimerai savoir comment peut on changé la couleur ou le style de la bar de menu ainsi que la couleur de la toolbar... par la même occasion j'aimerai savoir si il est possible d'agrandir la taille des buttons toolbar et comment rendre le font de mes gadgettext transparent.
Merci de me venir en aide :)
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Re: Menu et Toolbar

Message par Backup »

Neosis a écrit :Salut tous le monde :) ,
J'aimerai savoir comment peut on changé la couleur ou le style de la bar de menu ainsi que la couleur de la toolbar... par la même occasion j'aimerai savoir si il est possible d'agrandir la taille des buttons toolbar et comment rendre le font de mes gadgettext transparent.
Merci de me venir en aide :)
regarde a "SetGadgetColor(#Gadget, TypeCouleur, Couleur)" dans la doc,

Si ce que tu veux colorer n'est pas pris en charge par cette commande, il ne te reste plus qu'a te tourner vers les librairies
genre : PureColor Par exemple :

http://freenet-homepage.de/gnozal/

a Savoir que l'ajout de la couleur dans Purebasic, c'est très récent, il manque énormément de commande la dessus..
peut etre en 2033 ; sait on jamais :)
Neosis
Messages : 113
Inscription : dim. 24/févr./2008 20:11

Message par Neosis »

j'ai déjà regarder "setgadgetcolor" mais je voulais mettre une couleur transparent et puis ça marche pas sur la plus part des gadgets que je veux modifier , sinon je vais jeter un pti coup d'oeil sur purecolor.
Si quelqu'un possède quelques solution :P
Neosis
Messages : 113
Inscription : dim. 24/févr./2008 20:11

Message par Neosis »

J'ai trouvé une réponse a l'une de mes questions... comment redimensionné un bouton de la toolbar...
Je met le code source, on ne c'est jamais si ça peut intérréssez quelqu'un ;)

Structure TBSize
x.l
y.l
EndStructure

Procedure MakeLong(low, high)
ProcedureReturn low | (high<<16)
EndProcedure

#WindowFlags = #PB_Window_SizeGadget | #PB_Window_MaximizeGadget | #PB_Window_MinimizeGadget | #PB_Window_TitleBar | #PB_Window_ScreenCentered | #PB_Window_SystemMenu

Window = OpenWindow(0,0,0,640,380,"",#WindowFlags)

Toolbar = CreateToolBar(0,Window)
ToolBarStandardButton(0, #PB_ToolBarIcon_New)
ToolBarStandardButton(1, #PB_ToolBarIcon_Print)
ToolBarStandardButton(2, #PB_ToolBarIcon_Find)

Size.TBSize
Size\x = 64
Size\y = 64

SendMessage_(Toolbar, #TB_SETBUTTONSIZE, 0, MakeLong(Size\x, Size\y))
ResizeWindow(0,#PB_Ignore,#PB_Ignore,WindowWidth(0)+1,WindowHeight(0)+1)
ResizeWindow(0,#PB_Ignore,#PB_Ignore,WindowWidth(0)-1,WindowHeight(0)-1)

Repeat
Event = WindowEvent()
Delay(10)
Until Event = #PB_Event_CloseWindow
End
Répondre