Le portail francophone de la géomatique

jean94 · Wed 26 May 2010 16:43

Bonjour à tous,

J'ai un mbx avec un list box. Le list box se met a jour (se rempli) selon le nom des champs d'une table choisi.
Mon problème est que quand je ferme mon dialogue (bouton annulé) et que je le réouvre et rechoisi une table, le list box se rempli a nouveau mais contenant 2 fois les noms des champs. Pourtant dans ma procédure j'ai un «Alter Control 7 Title ""» se qui a mon avis devait "vider" mon list box.

Maurice · Wed 26 May 2010 19:16

Bonjour
Bien vu le Alter Control 7 Title ""...mais avez vous aussi un Redim variable_liste(0) pour "vidanger" la liste précédemment établie ??

jean94 · Wed 26 May 2010 19:26

bonjour

J'ai pu règler le problème. Voici le code

Code:

sub listbox_valeurs 

dim a_list as string
Dim i_numcols As SmallInt
dim i as smallint

i_numcols = TableInfo(adresse, TAB_INFO_NCOLS)

if i_numcols=0 then exit sub 
end if

for i=1 to i_numcols
a_list=a_list+ColumnInfo(adresse,"col"+i,COL_INFO_NAME)+";"
next
a_list=left$(a_list, len(a_list)-1)
Alter Control 7 Title a_list
a_list = ""

Et voici ce que j'en ai conclu... c'est que le "Controle 7 Title" ne peut être altéré comme un simple controle value e.g. edit text. Même en essayant de passer mon «""» en variable. Pour résoudre mon problème j'ai ajouter a la fin de la procédure a_list = "" ce qui fait que ma variable est vidangée après que la valeur ait été attribué à la liste box et donc lorsque la sub est invoqué ma variable ne contient plus la champs non voulu.

@ Maurice

Je croyais que Redim variable_liste(0) s'appliquait seulement au variable "Array" ?....si non, as-tu un code concrès ou il est utilisé comme exemple?

Dernière modification par jean94 (Wed 26 May 2010 19:27)

Maurice · Wed 26 May 2010 19:35

jean94 a écrit:

Je croyais que Redim variable_liste(0) s'appliquait seulement au variable "Array" ?...

C'est le cas...et je croyais que tu utilisais une variable "array" comme je le fais personnellement toujours quand je dois utiliser une liste

jean94 · Wed 26 May 2010 19:42

Ok pour les bien des utilisateur, et moi-même, pourrais-tu coller un exemple de list box en array pour comparer ici?

JF

Maurice · Wed 26 May 2010 22:06

Sur le même exemple

Code:

sub listbox_valeurs 

dim a_list() as string
Dim i_numcols As SmallInt
dim i as smallint

i_numcols = TableInfo(adresse, TAB_INFO_NCOLS)

if i_numcols=0 then exit sub 
else redim a_list(i_numcols)
end if

for i=1 to i_numcols
a_list(i)=ColumnInfo(adresse,"col"+i,COL_INFO_NAME)
next

Alter Control 7 Title From Variable a_list
Redim a_list(0)

Communauté	Ressources	L'emploi	Le marché	L'association	Fils RSS
Forum Blogs Wiki Planet Sites amis	Agenda Biblio Fiches AMO-CNIG Paris PCGIS Téléchargements	Offres d'emploi Banque de CV Formations Démarche Métiers	Geo-Entreprises Geo-Communiqué Appels d'offres	L'association Qui sommes-nous ? Nous aider Bienfaiteurs Partenaires Historique Statuts	Tout le site Job Géomatique Services GeoBlogs ...	Faire un don Mentions légales

Le portail francophone de la géomatique

Annonce

#1 Wed 26 May 2010 16:43

[Map Basic 10] List Box (champs dupliqué)

#2 Wed 26 May 2010 19:16

Re: [Map Basic 10] List Box (champs dupliqué)

#3 Wed 26 May 2010 19:26

Re: [Map Basic 10] List Box (champs dupliqué)

Code:

#4 Wed 26 May 2010 19:35

Re: [Map Basic 10] List Box (champs dupliqué)

#5 Wed 26 May 2010 19:42

Re: [Map Basic 10] List Box (champs dupliqué)

#6 Wed 26 May 2010 22:06

Re: [Map Basic 10] List Box (champs dupliqué)

Code:

Pied de page des forums