Starter Open Source !

Programmation d'applications complexes
Avatar de l’utilisateur
Ar-S
Messages : 9478
Inscription : dim. 09/oct./2005 16:51
Contact :

Re: Starter Open Source !

Message par Ar-S »

J'ai fait mes modifs de macro mais rien à voir.
J'ai trouvé la coquille, il faut commenter ton

Code : Tout sélectionner

And GetGadgetState(#Panel_1)  <> 2
Car tes deux 1ers panels sont 0 et 1, le 2 est le 1er de l'utilisateur.
~~~~Règles du forum ~~~~
⋅.˳˳.⋅ॱ˙˙ॱ⋅.˳Ar-S ˳.⋅ॱ˙˙ॱ⋅.˳˳.⋅
W11x64 PB 6.x
Section HORS SUJET : ICI
LDV MULTIMEDIA : Dépannage informatique & mes Logiciels PB
UPLOAD D'IMAGES : Uploader des images de vos logiciels
Avatar de l’utilisateur
MetalOS
Messages : 1492
Inscription : mar. 20/juin/2006 22:17
Localisation : Lorraine
Contact :

Re: Starter Open Source !

Message par MetalOS »

Salut ptit vieux, merci de partager ton starter en open source, ça me rappelle les folles années des eepc et surtout de notre bon vieux NC10 qui fonctionne toujours à merveille chez moi sous Linux.
Avatar de l’utilisateur
Ar-S
Messages : 9478
Inscription : dim. 09/oct./2005 16:51
Contact :

Re: Starter Open Source !

Message par Ar-S »

Une autre modif à faire;

Rechercher la chaine

Code : Tout sélectionner

SetGadgetState(#Panel_1 ,CountGadgetItems(#Panel_1)-1) ; active le dernier onglet crée
Déplacer le CloseGadgetList() qui se situe après le Endif avant ce même Endif
Ce qui donne

Code : Tout sélectionner

SetGadgetState(#Panel_1 ,CountGadgetItems(#Panel_1)-1) ; active le dernier onglet crée
EndIf
CloseGadgetList()	
par

Code : Tout sélectionner

SetGadgetState(#Panel_1 ,CountGadgetItems(#Panel_1)-1) ; active le dernier onglet crée
CloseGadgetList()	
Endif
Sinon on obtient une erreur si lorsque l'on clique sur "Créer un nouvel onglet" puis on n'entre rien et qu'on utilise la croix pour fermer l'inputrequester.

-------------

Autre modif pour retrouver le fond noir dans l'onglet principal
Dans Procedure OpenWindow_Window_0()
Remplacer

Code : Tout sélectionner

PanelGadget(#Panel_1, 0, 10, largeur_starter,hauteur_starter) ;215, 530
PureCOLOR_SetGadgetColor(BGwindow,TextColor.l, couleur_fond_panel)
par

Code : Tout sélectionner

PanelGadget(#Panel_1, 0, 10, largeur_starter,hauteur_starter) ;215, 530
BGwindow = ContainerGadget(#PB_Any, 0, 30, largeur_starter, hauteur_starter-30, #PB_Container_Flat )
PureCOLOR_SetGadgetColor(BGwindow,TextColor.l, couleur_fond_panel) 
DisableGadget(BGwindow,1)
----

Question.
Pourquoi avoir les icones en PNG et en JPG ?
~~~~Règles du forum ~~~~
⋅.˳˳.⋅ॱ˙˙ॱ⋅.˳Ar-S ˳.⋅ॱ˙˙ॱ⋅.˳˳.⋅
W11x64 PB 6.x
Section HORS SUJET : ICI
LDV MULTIMEDIA : Dépannage informatique & mes Logiciels PB
UPLOAD D'IMAGES : Uploader des images de vos logiciels
Avatar de l’utilisateur
Ar-S
Messages : 9478
Inscription : dim. 09/oct./2005 16:51
Contact :

Re: Starter Open Source !

Message par Ar-S »

Pour les JPG/PNG je parlais des images dans le includes qui sont en doublon jpg et png
Elles n'ont pas la même taille mais ce sont les mêmes images. Tu pourrais n'utiliser que les grandes éventuellement et les redimensionner à la volée.
Ou simplement les mettre aux dimensions des boutons (poste de travail etc...)
~~~~Règles du forum ~~~~
⋅.˳˳.⋅ॱ˙˙ॱ⋅.˳Ar-S ˳.⋅ॱ˙˙ॱ⋅.˳˳.⋅
W11x64 PB 6.x
Section HORS SUJET : ICI
LDV MULTIMEDIA : Dépannage informatique & mes Logiciels PB
UPLOAD D'IMAGES : Uploader des images de vos logiciels
Répondre