/drawtrackbar <-h/-v> <@> <x> <y> <w/h> <pos>
Soyez le premier à donner votre avis sur cette source.
Snippet vu 2 783 fois - Téléchargée 26 fois
Contenu du snippet
Permet de dessiner une trackbar à l'intéreur d'une window à la position demandée (vous décider aussi de la position du pointeur)
Source / Exemple :
; /drawtrackbar <-h/-v> <@> <x> <y> <w/h> <pos> par WapsNest/War[DoWn] (J.Guay@MathInformatique.Com)
; Exemple:
; /drawtrackbar -h @amp 5 100 200 20 <= Dessinera une trackbar horizontale dans la fenêtre @amp aux coordonnées (5,100) de 200 pixels de largeur avec un curseur à la position 20 de la trackbar
; /drawtrackbar -v @vol 5 100 200 20 <= Dessinera une trackbar horizontale dans la fenêtre @vol au coordonnées (5,100) de 200 pixels de hauteur avec un curseur à la position 20 de la trackbar
; Ouverture de l'alias
alias drawtrackbar {
var %w = $iif($left($2,1) == $chr(64),$2,$chr(64) $+ $2)
; Si certain paramêtres sont manquants ou que la position du pointeur est plus grand que la hauteur/largeur de la trackbar
if !$6 || !$window(%w) || $6 > $5 { halt }
; Si la trackbar devra être horizontale
if $1 == -h {
; Nous dessinons la barre à la position et les dimensions demandée
drawrect -r %w $rgb(0,0,0) 1 $3-5 4
drawrect -r %w $rgb(180,180,180) 1 $calc($3 + 1) $calc($4 + 1) $calc($5 - 2) 1
drawrect -r %w $rgb(220,220,220) 1 $calc($3 + 1) $calc($4 + 2) $calc($5 - 2) 1
; Nous dessinons le pointeur à la position demandé
drawrect -r %w $rgb(0,0,0) 1 $calc(($6 + $3) - 2) $calc($4 - 4) 5 12
drawrect -r %w $rgb(180,180,180) 1 $calc(($6 + $3) - 1) $calc($4 - 3) 3 10
drawrect -r %w $rgb(220,220,220) 1 $calc($6 + $3) $calc($4 - 2) 1 8
}
; Si la barre devra être verticale
if $1 == -v {
; Nous dessinons la barre à la position et les dimensions demandée
drawrect -r %w $rgb(0,0,0) 1 $3-4 4 $5
drawrect -r %w $rgb(180,180,180) 1 $calc($3 + 1) $calc($4 + 1) 1 $calc($5 - 2)
drawrect -r %w $rgb(220,220,220) 1 $calc($3 + 2) $calc($4 + 1) 1 $calc($5 - 2)
; Nous dessinons le pointeur à la position demandé
drawrect -r %w $rgb(0,0,0) 1 $calc($3 - 4) $calc(($6 + $4) - 2) 12 5
drawrect -r %w $rgb(180,180,180) 1 $calc($3 - 3) $calc(($6 + $4) - 1) 10 3
drawrect -r %w $rgb(220,220,220) 1 $calc($3 - 2) $calc($6 + $4) 8 1
}
}
A voir également
- Y et w
- V(x+y) - Meilleures réponses
- IRC : /netb @window x y w h (transformation d'une zone en noire et blanc) - CodeS SourceS - Guide
- Javascript : Rétro-C. Surfaces h = f(x,y) au trait - CodeS SourceS - Guide
- En VBS comment convertir x minutes sous la forme j/h/mn ✓ - Forum - Visual Basic
- Stdarg.h - Conseils pratiques - C / C++ / C++.NET
- Shutdown -h cmd - Conseils pratiques - Visual Basic / VB.NET
Commentaire
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.