FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» Un prg Panoramic s'abime avec le temps
par papydall Aujourd'hui à 3:14

» Planétarium virtuel.
par Pedro Alvarez Hier à 16:58

» Dessin 2D: largeur de trait (résolu !)
par Jicehel Hier à 15:16

» Promenade dans le Ciel
par papydall Hier à 3:13

» PanExpress : l'éditeur Panoramic avec création d'objet
par Minibug Sam 23 Juin 2018 - 17:00

» Nouvelle version 0.34
par jean_debord Sam 23 Juin 2018 - 9:39

» Quantité de mémoire utilisée par un exe
par mindstorm Jeu 21 Juin 2018 - 21:22

» Projet de planétarium virtuel.
par Jean Claude Jeu 21 Juin 2018 - 19:02

» Animation: Feux de signalisation
par Minibug Mer 20 Juin 2018 - 20:28

» Problème avec 'file_load'.
par Pedro Alvarez Lun 18 Juin 2018 - 8:12

» Version instantanée V 0.9.28i20 du 13/06/2018
par jjn4 Sam 16 Juin 2018 - 14:25

» string$(0,chr$(32)) sans erreur
par silverman Ven 15 Juin 2018 - 19:56

» Version instantanée V 0.9.28i19 du 13/06/2018
par Minibug Ven 15 Juin 2018 - 19:14

» Mes souhaits d'amélioration de Panoramic.
par Pedro Alvarez Jeu 14 Juin 2018 - 20:17

» [RÉSOLU] Message d'erreur impossible à indentifier
par Minibug Mer 13 Juin 2018 - 20:52

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Juin 2018
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
252627282930 
CalendrierCalendrier

Partagez | 
 

 couleur d'un progress_bar

Aller en bas 
AuteurMessage
silverman

avatar

Nombre de messages : 645
Age : 46
Localisation : Picardie
Date d'inscription : 18/03/2015

MessageSujet: couleur d'un progress_bar   Dim 30 Oct 2016 - 13:31

Bonjour à tous!

'color' ne permet pas de changer la couleur de la barre d'un objet 'progress_bar', voici une sub autonome pour effectuer cet oubli Surprised
Code:
' colorer la barre de l'objet 'progress_bar'

  progress_bar 1:left 1,5:width 1,200
  color_progress_bar(1,255,0,255)   :' mauve
  position 1,50
  
  progress_bar 2:left 2,5:width 2,200:top 2,100
  color_progress_bar(2,255,0,0)   :' rouge
  position 2,50


END
sub COLOR_PROGRESS_BAR(nb%,r%,g%,b%)
 dim_local i,j,k%,my_library$,my_dll$,found%
 ' verifie si "user32" existe:
 my_dll$="user32"
   '
   i=0
   k%=0
   found%=0
   my_dll$=lower$(my_dll$)
   j=instr(my_dll$,".") : if j>0 then my_dll$=left$(my_dll$,j-1)
   '
   repeat
      k%=k%+1
   until library$(k%)="_"

   repeat
      i=i+1
         my_library$=lower$(library$(i))
         j=instr(my_library$,".") : if j>0 then my_library$=left$(my_library$,j-1)
         '
         if my_library$=my_dll$
            found%=1
            exit_repeat
         end_if
   until i=32
   '
   ' charge la librairie et cré la commande si nécessaire
   if found%=0
      library k%,my_dll$
'      print k%," : not found ",library$(k%)   :' debug
      command "pb_color","SendMessageA",k%,"IIII","stdcall"
   else
'      print i," : found ",library$(i)   :' debug
   end_if
   '
   ' colore la progress_bar
   pb_color handle(nb%),1033,0,(b%*65536)+(g%*256)+r%
end_sub
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

Nombre de messages : 8077
Age : 47
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Dim 30 Oct 2016 - 16:03

Je prends !
et je mets cela dans ma subothèque.
Laughing

Merci Silverman.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
JL35



Nombre de messages : 6292
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: couleur d'un progress_bar   Mar 1 Nov 2016 - 20:41

Astucieux, et ça marche ! même si je n'ai pas tout compris... scratch
Et bel exemple d'utilisation des nouveaux mots-clés panoramic (Library, Command...)
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: couleur d'un progress_bar   

Revenir en haut Aller en bas
 
couleur d'un progress_bar
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Couleur : traitement par Teinte, Saturation, Luminosité
» des photos en couleur de la 14-18
» Couleur et police...
» [SUGGESTION] Changer la couleur du groupe "membres" & idée d'un nouveau groupe
» Changer la couleur d'un progressbar ?

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: Vos sources, vos utilitaires à partager-
Sauter vers: