Couleur et objet TAB

@ Klaus,

J' ai voulu, pour voir, essayer de placer un un objet tab dans PPE2.
J' ai voulu changer la couleur des onglets et leurs labels mais là, je crois que j' ai mis le doigt sur un bug.

J' ai placé la version de PPE2 avec TAB sur mon webdav.
Essaye de cliquer sur un les onglets et tu verras il y a comme un souci... affraid

Je te laisse le découvrir cela sera plus rapide que de l' expliquer Laughing

...

Edit : Je ne pense pas l' utiliser par la suite mais je voulais te signaler le bug...

J'ai changé la section "tab" dans GUI.bas:

Code:: ' -- TAB --

obj% = obj% + 1
if variable("TAB_table%")=0 then dim TAB_table%(200)
if variable("TAB_count%")=0 then dim TAB_count%
if variable("TAB_f$")=0 then dim TAB_f$
if variable("TAB_a$")=0 then dim TAB_a$
TAB_create(obj%,550,760,40,205,6,img$)
TAB_count% = TAB_count% + 1
TAB_table%(TAB_count%) = obj% : ' res% <======== quel serait le sens de res% ici ?
TAB_parent(obj%,TB_Pan%)
TAB_label(obj%,1,"Main.ppe")
TAB_label(obj%,2,"Dec_Var.ppe")
TAB_label(obj%,3,"Dec_Lab.ppe")
TAB_label(obj%,4,"Dec_Sub.ppe")
TAB_label(obj%,5,"User_Lab.ppe")
TAB_label(obj%,6,"User_Sub.ppe")
TAB_tab_color(obj%,1,235,235,235)
TAB_tab_color(obj%,2,229,229,255)
TAB_tab_color(obj%,3,255,229,229)
TAB_tab_color(obj%,4,229,255,229)
TAB_tab_color(obj%,5,255,255,200)
TAB_tab_color(obj%,6,185,155,230)
if 1=2 : ' <============ if faut placer les libellés AVANT de changer la couleur !
TAB_label(obj%,1,"Main.ppe")
TAB_label(obj%,2,"Dec_Var.ppe")
TAB_label(obj%,3,"Dec_Lab.ppe")
TAB_label(obj%,4,"Dec_Sub.ppe")
TAB_label(obj%,5,"User_Lab.ppe")
TAB_label(obj%,6,"User_Sub.ppe")
end_if
obj%=obj%+1

Les commentaires indiquent ce que j'ai fait. Qu'est-ce que tu en penses maintenant ?

Effectivement, cela fonctionne mieux ainsi.
Mais là où mon esprit bug c' est sur : "if 1=2"
comment 1 peut être égal à 2 scratch

bref, cela fonctionne, que demander de plus... Laughing

J' ai placé une autre version de mon interface.
J' hésite entre les deux...

Heu....juste une question.
Comment on récupère le handle d' un onglet pour y insérer un RichEdit ?...

1. if 1=2
C'est juste ma manière de mettre une portion de code en commentaire, au lieu d'insérer un apostrophe o un "rem" devant chaque ligne. C'étaient tes lignes originales que j'ai déplacées avant les lignes "couleur", tout en les laissant en place sous forme de commentaires, pour montrer l'ancien emplacement mal choisi.

2. ajouter un RE dans un onglet
Ce n'est pas encore fait. Je m'y mets...

Merci Klaus pour ces explications.
Je vais donc travailler sur la version 2_1 pour l' instant
même si cela fait plus propre avec l' objet Tab...

C'est en cours...

ygeronimi a écrit:: comment 1 peut être égal à 2

Soit a = b

On multiplie par a :

a^2 = ab

On soustrait b^2 :

a^2 - b^2 = ab - b^2

On factorise :

(a + b) (a - b) = b(a - b)

On divise par (a - b) :

a + b = b

Mais comme a = b

2a = a

Donc si a = 1, 2 = 1 !

Cherchez l'erreur ...

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

Là tu vas être responsable de quelques maux de tête ce soir...

Je me souviens vaguement d' un cours de maths où on arrivait à un résultat du style 1=0
avec des équations...mais avouez, tout de même, que c' est dérangeant...

lol!