Barre de titre sans les 3 boutons

Nombre de messages : 2695 Date d'inscription : 13/09/2009

C'est vrai, ça peut gagner quelques fractions de secondes.
Mais en taille de texte, ça ne change rien.
Smile

Invité

C'est sûr que des fraction de seconde ce n'est pas beaucoup alors les deux idées son bonnes.

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

Je parlais de l'élégance de la programmation, pas du temps ni de l'espace gagnés ! Very Happy

Nombre de messages : 2695 Date d'inscription : 13/09/2009

Ah, si c'est de l'élégance, alors là, ça change tout !
Et dans ce cas, j'en publie la nouvelle version avec ta correction :

Code:: rem ' Essai-Barre-Titre-AChoisir
label quit , coul : dim a$ , i
width 0,800 : height 0,600 : border_hide 0
picture 1 : width 1,800 : height 1,30

alpha 2 : left 2,25 : top 2,8 : font_bold 2
font_size 2,10 : font_color 2,255,255,255
a$="bleu" : color 0,0,85,229 : color 2,0,85,229 : font_color 2,255,255,255
file_load 1,"Barre de titre "+a$+".jpg"
caption 2,"Démonstration de barre de titre colorée avec seulement la croix rouge"

alpha 3 : left 3,4 : top 3,30 : width 3,792 : height 3,566
color 3,236,233,216

picture 4 : left 4,773 : top 4,6 : width 4,21 : height 4,21
file_load 4,"Croix rouge.jpg" : on_click 4,quit

combo 5 : left 5,6 : top 5,32
item_add 5,"bleu" : item_add 5,"vert" : item_add 5,"rouge" : item_add 5,"orange"
item_add 5,"violet" : item_add 5,"rose" : item_add 5,"jaune" : item_add 5,"noir"
on_click 5,coul

end

coul:
i=item_index(5)
select i
case 1 : a$="bleu" : color 0,0,85,229 : color 2,0,85,229 : font_color 2,255,255,255
case 2 : a$="vert" : color 0,17,163,0 : color 2,17,163,0 : font_color 2,255,255,255
case 3 : a$="rouge" : color 0,219,2,70 : color 2,219,2,70 : font_color 2,255,255,255
case 4 : a$="orange" : color 0,222,133,3 : color 2,222,133,3 : font_color 2,255,255,255
case 5 : a$="violet" : color 0,183,3,224 : color 2,183,3,224 : font_color 2,255,255,255
case 6 : a$="rose" : color 0,232,0,171 : color 2,232,0,171 : font_color 2,0,0,255
case 7 : a$="jaune" : color 0,220,200,3 : color 2,220,200,3 : font_color 2,0,0,255
case 8 : a$="noir" : color 0,76,76,76 : color 2,76,76,76 : font_color 2,255,255,255
end_select : file_load 1,"Barre de titre "+a$+".jpg"
return

quit:
terminate

Merci JL35 !
Smile

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

Je n'en demandais pas tant, c'était juste une remarque ! mais bon, je reconnais bien là ton fair-play ! Wink

Pour pinailler encore plus, j'aurais mis le a$ = item_index$(5) à côté du i = item_index(5), c'est à dire une seule fois (la programmation étant entre autres l'art de faire faire les tâches répétitives à l'ordinateur).

Nombre de messages : 2695 Date d'inscription : 13/09/2009

Mais, voilà qui est très juste !
Et donc, encore plus élégant !
Ca mérite donc indéniablement une 3° version
revue et corrigée par JL35.

Code:: rem ' Essai-Barre-Titre-AChoisir
label quit , coul : dim a$ , i
width 0,800 : height 0,600 : border_hide 0
picture 1 : width 1,800 : height 1,30

alpha 2 : left 2,25 : top 2,8 : font_bold 2
font_size 2,10 : font_color 2,255,255,255
a$="bleu" : color 0,0,85,229 : color 2,0,85,229 : font_color 2,255,255,255
file_load 1,"Barre de titre "+a$+".jpg"
caption 2,"Démonstration de barre de titre colorée avec seulement la croix rouge"

alpha 3 : left 3,4 : top 3,30 : width 3,792 : height 3,566
color 3,236,233,216

picture 4 : left 4,773 : top 4,6 : width 4,21 : height 4,21
file_load 4,"Croix rouge.jpg" : on_click 4,quit

combo 5 : left 5,6 : top 5,32
item_add 5,"bleu" : item_add 5,"vert" : item_add 5,"rouge" : item_add 5,"orange"
item_add 5,"violet" : item_add 5,"rose" : item_add 5,"jaune" : item_add 5,"noir"
on_click 5,coul

end

coul:
i=item_index(5) : a$=item_index$(5)
select i
case 1 : color 0,0,85,229 : color 2,0,85,229 : font_color 2,255,255,255
case 2 : color 0,17,163,0 : color 2,17,163,0 : font_color 2,255,255,255
case 3 : color 0,219,2,70 : color 2,219,2,70 : font_color 2,255,255,255
case 4 : color 0,222,133,3 : color 2,222,133,3 : font_color 2,255,255,255
case 5 : color 0,183,3,224 : color 2,183,3,224 : font_color 2,255,255,255
case 6 : color 0,232,0,171 : color 2,232,0,171 : font_color 2,0,0,255
case 7 : color 0,220,200,3 : color 2,220,200,3 : font_color 2,0,0,255
case 8 : color 0,76,76,76 : color 2,76,76,76 : font_color 2,255,255,255
end_select : file_load 1,"Barre de titre "+a$+".jpg"
return

quit:
terminate

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

Je sens qu'on s'approche de la perfection... sunny

et moi de... Sleep

Invité

OUI ! Et toi de t'endormir.
Moi ici en ce moment il est 17:50 3 seconde

Avec la manière de JJN4 (Mettre une image pour quelque chose qui n'existe pas en Panoramic) j'ai fait un objet STATUS_BAR avec 3 objets.

Merci JJN4 !

Mais moi quand même je commence à m'endormir (Pourtant ce n'est pas de mes habitudes.)

Admin Nombre de messages : 2386 Date d'inscription : 28/05/2007

Citation :: Essai-Barre-Titre
Essai-Barre-Titre-2
Essai-Barre-Titre-Vert
Essai-Barre-Titre-Rouge
Essai-Barre-Titre-Orange
Essai-Barre-Titre-Violet
Essai-Barre-Titre-Rose
Essai-Barre-Titre-RoseX
Essai-Barre-Titre-Jaune
Essai-Barre-Titre-Noir
Essai-Barre-Titre-Multicolor
Essai-Barre-Titre-AChoisir

J'ai comme l'impression qu'il y a un message là dessous et qu'on me demande des commandes pour avoir des bandeaux multicolores avec le choix des boutons...

Nombre de messages : 2695 Date d'inscription : 13/09/2009

Pour le choix des boutons, oui, c'est sûr,
pour les colorations multiples de la barre de titre,
je ne sais pas, c'est une idée qui m'est venue ensuite
quand je me suis aperçu qu'on pouvait faire ça aussi.
Mais je ne sais pas trop ce qu'en pensent les autres
participants du forum... ?
Est-ce que tout le monde a vraiment envie de faire
des programmes habillés de vert ou de rose ?
En tout cas, ça distinguerait le langage panoramic
comme original par rapport aux autres langages,
(dans les productions éditées publiquement)
parce que je ne connais pas de basic où on
puisse faire cela...
geek

Pour répondre à Jack.

Oui, si PANORAMIC peut nous ouvrir la possibilité de créer des FORMs dont on pourrait controler les bouttons réduire, agrandir et fermer, çà serait super et si en plus on peut choisir la couleur du bandeau, c'est la cerise sur la gateau.

A+

Invité

Et oui Jean Claude !

Moi j'aurais besoin d'inactiver le bouton pour agrandir pour ne pas pouvoir agrandir ou rapetisser la fenêtre.

Et la bordure Border_small on ne serait pas supposer être capable de agrandir le form ou le rapetisser.

» Titre en relief
» [Astuce]Connaitre taille des bordure et de la barre de titre
» Partage de source: code ASCII des polices du système
» Barre de lancement
» Une barre de lancement rapide