Astuce pour repérer les objets

Sujet: Astuce pour repérer les objets Mer 10 Nov 2010 - 11:41

Salut à tous,

C'est en me servant de l'IDE de PANORAMIC, que j'ai repèré des infos_bulles concernant les objets et cela m'a donné cette idée pour repérer un objet par son numéro.
Ce n'est pas une grande découverte, mais cela peut rendre service.

Code:: dim n,a$,nbo%
' ------------------------------------------------------------------------------
left 0,226:top 0,600:width 0,890:height 0,324:caption 0,"Form 0"
memo 1:left 1,30:top 1,40:width 1,821:height 1,45
combo 2:left 2,30:top 2,150
combo 3:left 3,200:top 3,150
combo 4:left 4,370:top 4,150
alpha 5:left 5,30:top 5,130:width 5,100:caption 5,"Type "
alpha 6:left 6,200:top 6,130:width 6,100:caption 6,"Famille"
alpha 7:left 7,370:top 7,130:width 7,100:caption 7,"Sous-Famille"
picture 8:left 8,530:top 8,150:width 8,320:height 8,17
alpha 9:left 9,610:top 9,130:width 9,145:caption 9,"Visu "
edit 10:left 10,30:top 10,230
alpha 11:left 11,30:top 11,210:caption 11,"Montant"
combo 12:left 12,200:top 12,230:width 12,46
combo 13:left 13,260:top 13,230:width 13,45
combo 14:left 14,310:top 14,230:width 14,51
alpha 15:left 15,200:top 15,210:width 15,40:caption 15,"Jour"
alpha 16:left 16,260:top 16,210:width 16,40:caption 16,"Mois"
alpha 17:left 17,310:top 17,210:width 17,40:caption 17,"Année"
alpha 18:left 18,255:top 18,190:width 18,100:caption 18,"Date":font_size 18,11
button 19:left 19,580:top 19,230:width 19,100:caption 19,"Valider "
button 20:left 20,470:top 20,230:width 20,100:caption 20,"Enregistrer "
button 21:left 21,380:top 21,230:caption 21,"Effacer"

nbo%=number_objects:for n=0 to nbo%:a$="Numéro d'objet: "+str$(n)+" ":hint n,a$:next n
END
' ==============================================================================

L'astuce c'est la ligne 26 qui peut-être shuntée ou supprimée quand le code est terminé.

A+

Sujet: Re: Astuce pour repérer les objets Mer 10 Nov 2010 - 14:23

C'est astucieux, mais ça suppose qu'il n'y ait aucun trou dans la numérotation des objets, sinon ça fiche tout par terre, les numéros ne correspondent plus.

Ça serait bien aussi qu'il y ait une instruction qui donne le type d'un objet d'après son numéro... mais bon, je ne vais pas relancer une polémique... Very Happy

Sujet: Re: Astuce pour repérer les objets Mer 10 Nov 2010 - 17:42

Exact, pour les numéros d'objet, il faut éffectivement qu'il n'y ai pas de trou. Et je dois dire que je n'y avais pas pensé.
Pour le type d'objet: oui, une instruction pourrait-être sympa mais, en fait, le HINT ne marche que si tu lances le programme et donc, l'objet, tu le visualises ....

A+

Sujet: Re: Astuce pour repérer les objets Mer 10 Nov 2010 - 18:18

Oui tu as raison, le type d'objet ne servirait finalement pas à grand chose.
J'essaie ton astuce sur un de mes programmes, mais comme il y a plus de trous dans mes objets que dans un gruyère, ça ne marche pas.
Là ça servirait de savoir si un objet existe ou non, pour pouvoir le sauter.
Bon, je n'insiste pas ... Very Happy

Sujet: Re: Astuce pour repérer les objets Mer 10 Nov 2010 - 19:01

Oui, mais si ton gruyère est organisé c'est jouable quand même, je m'explique.

J'ai ajouté un form 100 et voila le code:

Code:: dim n,a$,nbo%,anbo%
label fin
' ------------------------------------------------------------------------------
left 0,226:top 0,600:width 0,890:height 0,324:caption 0,"Form 0"
memo 1:left 1,30:top 1,40:width 1,821:height 1,45
combo 2:left 2,30:top 2,150
combo 3:left 3,200:top 3,150
combo 4:left 4,370:top 4,150
alpha 5:left 5,30:top 5,130:width 5,100:caption 5,"Type "
alpha 6:left 6,200:top 6,130:width 6,100:caption 6,"Famille"
alpha 7:left 7,370:top 7,130:width 7,100:caption 7,"Sous-Famille"
picture 8:left 8,530:top 8,150:width 8,320:height 8,17
alpha 9:left 9,610:top 9,130:width 9,145:caption 9,"Visu "
edit 10:left 10,30:top 10,230
alpha 11:left 11,30:top 11,210:caption 11,"Montant"
combo 12:left 12,200:top 12,230:width 12,46
combo 13:left 13,260:top 13,230:width 13,45
combo 14:left 14,310:top 14,230:width 14,51
alpha 15:left 15,200:top 15,210:width 15,40:caption 15,"Jour"
alpha 16:left 16,260:top 16,210:width 16,40:caption 16,"Mois"
alpha 17:left 17,310:top 17,210:width 17,40:caption 17,"Année"
alpha 18:left 18,255:top 18,190:width 18,100:caption 18,"Date":font_size 18,11
button 19:left 19,580:top 19,230:width 19,100:caption 19,"Valider "
button 20:left 20,470:top 20,230:width 20,100:caption 20,"Enregistrer "
button 21:left 21,380:top 21,230:caption 21,"Effacer"

nbo%=number_objects:for n=0 to nbo%:a$="Numéro d'objet: "+str$(n)+" ":hint n,a$:next n
' ------------------------------------------------------------------------------
anbo%=nbo%
Form 100
command_target_is 100
button 101:caption 101,"Quitter":on_click 101,fin

nbo%=number_objects:nbo%=(nbo%-anbo%)+99:for n=100 to nbo%:a$="Numéro d'objet: "+str$(n)+" ":hint n,a$:next n
caption 100,str$(nbo%)
END
' ==============================================================================
fin:
terminate

Bon, çà commence à être tirer par les cheveux, mais çà marche encore.

A+

Sujet: Re: Astuce pour repérer les objets Mer 10 Nov 2010 - 19:14

Par contre si tu veux insérer un Main_Menu 101 à la place du bouton, çà y est c'est la gamelle.

Astuce à manier avec modération drunken

Sujet: Re: Astuce pour repérer les objets Mer 10 Nov 2010 - 21:38

Je suis bien d'accord que c'est plutôt tiré par les cheveux (on dit capillo-tracté quand on veut avoir l'air à la coule).

Dans mon cas par exemple, si je numérote les boutons de 10 à 19, les List de 20 à 29, les Picture de 50 à 99, avec plein de trous entre les types, là ça ne va plus du tout.

Finalement il va bien falloir que je me mette à la numérotation continue, en attribuant un nom de variable à chaque objet (qui vaudra objet_précédent + 1). mais ça risque de faire beaucoup de variables à déclarer...

Sujet: Re: Astuce pour repérer les objets Mer 10 Nov 2010 - 23:08

Hé !
Tu n'es pas obligé d'utiliser la "méthode Nardo" qui en fait, provient de D.J Peters (quand il déclare sa barre de boutons dans je ne sais plus quel prog...)

Rolling Eyes

» Astuce pour une form
» Juste une astuce pour débloquer l'éditeur
» astuce MARK_ON/OFF pour 'sub_menu'
» Astuce pour maîtriser fa fin d'un programme
» Astuce pour la recherche sur le forum...