Objets "nommés"

Est-ce que l'on peut imaginer d'avoir un "nom" sous forme d'un string pour des objets ? On pourrait affecter le nom au moment de la création de l'objet, ou plus tard par une instruction. Les objets créés par un nom auraient un numéro générique automatique que l'on pourrait interroger par une fonction.

Cela pourrait donner à peu près cela:

Code:

rem  création d'un alpha façon habituelle
alpha 1
caption 1,"Mon alpha nommé"
...
rem affecter un nom au alpha
name 1,"Mon_Alpha"
...
rem utiliser l'Alpha
width 1,100
width "Mon_Alpha",200

ou alors

rem création d'un alpha par le nom
alpha "Mon_Alpha_Nommé"
...
rem utiliser cet alpha
width "Mon_Alpha_Nommé",100
...
Rem récuperer le numéro d'objet de cet alpha
dim ind
...
ind = index("Mon_Alpha_Nommé")
width ind,150
...

Cela contribuerait à faciliter l'indépendance des sources entre plusieurs modules #INCLUDE, en particulier si un tel module décrit une FORM, et à rendre le programme plus lisible.

Ce n'est pas tout à fait la même chose, mais on peut d'ores et déjà paramétrer en nommant un objet par une variable:

Code:

Dim liste1, combo1
' ...
liste1 = NUMBER_OBJECTS + 1
LIST liste1
combo1 = NUMBER_OBJECTS + 1
COMBO combo1

(et pardon si j'enfonce une porte ouverte...)

Effectivement, j'avais bien vu cela. Dans la perspective des modules INCLUDE, cela peut sercir à attribuer, par une variable, le numéro d'objat de base pour un module INCLUDE. Exemple:

Code:

dim numero_base
...
numero_base = 200
#INCLUDE "module1.bas"
...
numero_base = 300
#INCLUDE "module2.bas"
...

etc

Mais cela ne permet pas de savoir dans un module quel objet contient la date de naissance du module de base, par exemple. Si l'on imagine un programme appelant deux FORMs similaires mais différentes (fiche contact personnel ou fiche contact professionnel, par exemple), les deux FORMs pourraient avoir des champs similaires (le nom, par exemple) et on pourrait référencer facilement ces champs ailleurs par

Code:

rem variable pour recueillir le nom
dim nom$
...
rem prendre le nom de la fiche de contact privé
nom$ = text$(index("Privé_Nom"))
...
rem prendre le nom de la fichie de contact professionnel
nom$ = text$(index("Pro_Nom"))
...

J'en conviens, cela n'a rien d'incontournable; comme je l'ai dit, on peut toujours passer par des conventions de plages de numéros. Mais le programme est tellement plus lisible avec des noms en clair. Je sais qu'on peut contourner cela aussi par des raviables définis en début de programme contenant chacune le nom d'un objet. Mais c'est beaucoup plus lour à mettre en place.

Moi perso si un jour on arrive à avoir des variables locales ça me satisfera.
C'est vrai que restent les objets, communs, mais je pense qu'il va falloir les cantonner dans le programme principal. Si possible.
Il est vrai que je n'ai pas l'ambition (ni l'utilité) de réaliser un programme commercial complexe, alors mes besoins sont plus limités et je peux en général contourner les difficultés qui se présentent.

Citation :

Est-ce que l'on peut imaginer d'avoir un "nom" sous forme d'un string pour des objets ?

J'avais regardé la possibilité d'établir une équivalence entre un nombre et une chaine alphanumérique, sous forme de mot-clé EQUIV
Cela permettait de donner des "noms" aux objets:

Code:

equiv mon_bouton,1:button mon_bouton

Mais ce n'était pas un string pour 2 raisons:
1 - pour éviter que le nom devienne illisible:
appeler un bouton left$(a$,4)+"az"+b$, c'est aussi illisible que de lui affecter une expression mathématique (ce qui est possible actuellement), de même pouvoir faire:
a$="mon-bouton"
b$="mon-bouton"
et 50 lignes plus loin:
left a$,10:top b$,40: rem on agit sur le même bouton dont le nom est caché dans a$ ou b$
ça n'est pas terrible au niveau lisibilité du programme
2 - pour éviter de devoir évaluer comme un string ce qui est un nombre.

EQUIV permettait d'établir une table de correspondance entre une suite de caractères (le nom) et un nombre (le numéro associé), ainsi le nom reste identique d'un bout à l'autre du programme. Car il n'est pas possible de le "manipuler" par les fonctions propres au string.

Je n'ai pas continué car tout le monde utilisait les numéros, mais c'est une idée à suivre...

Bonjour
(le fait de m'écarter un peu du forum ne veut pas dire que je m'exclus)
Je ne comprends pas très bien. Est ce que cela a un rapport avec ce que j'ai publié: programme pour nommer les objets, qui se trouve à la fin du poste: https://panoramic.1fr1.net/vos-sources-vos-utilitaires-a-partager-f2/parametrer-les-numeros-d-objets-t364.htm#2342
Parce que nommer un objet c'est pas dur. Mais je pense que toi, tu vois autre chose.