Le portail francophone de la géomatique

Bonjour
Il faut passer par une commande interprétée:

dim cmd as string
cmd="shade 14 with "+EMISSIONS+"/"+SOUMISSIONS+"*100 ranges apply all use all Brush (2,3253076,16777215) 
  0: 33 Brush (2,14096668,16777215) Pen (2,2,16777215) ,
  33: 66 Brush (2,10934634,16777215) Pen (2,2,16777215) ,
  66: 100 Brush (2,3253076,16777215) Pen (2,2,16777215) 
  default Brush (2,16777215,16777215) Pen (1,2,0) 
  # use 0 round 1 inflect on Brush (2,16776960,16777215) at 2 by 0 color 1 #"
Run Command cmd

Ci dessus je suppose que EMISSIONS et SOUMISSIONS sont des variables...et je conserve les retours à la igne pour la lisibilité mais a priori il faut tout mettre sur la même ligne ou introduire des chr$(13)...

Bonjour,

Finalement passer par des commande ne fonctionne pas dans mon cas, car les bornes sont des variables définit par un edittext d'un formulaire. Je ne comprends toujours pas pourquoi mapbasic ne prend pas le charactère "#" alors que le workspace le prend.

Quelqun à une autre solution

p.s. dans mon code les bornes sont les suivantes
BorneA1
BorneA2
BorneB1
BorneB2
BorneC1
BorneC2

Merci Jf

Bonsoir
Je le redis: il FAUT passer par une commande interprétée, en mettant tout ce qui est variable en dehors des guillemets
Il est prudent de faire un Print cmd avant le Run Command cmd, pour vérifier qu'on ne s'est pas trompé
Noter aussi que chr$(34) = guillemets ...

ps: chaque langage est "bizarre" mais on ne peut qu'en respecter la syntaxe !

I faut voir en détail comment le nom du champ est utilisé, mais il y a bien des chances que ce soit une variable...et il ne faut pas oublier que pour les noms de colonnes, il faut passer par des variables définies comme Alias

Sans rentrer dans les détails: éviter "table" comme nom de la table, introduisez un print pour vérifier (en comparant avec ce qui s'ecrit dans un wor qui marche), donnez la bonne définition aux variables (string ou smallint, etc...) suivant les cas

Open Table "H:\intranet\Ventes\Ratio_vente_soum\par_produit\2010\mars\Auto_autres_produits_mun.TAB" Interactive as bidule
Map From bidule

dim cmd as string
dim borneA1 as smallint
dim borneA2 as smallint
dim borneB1 as smallint
dim borneB2 as smallint
dim borneC1 as smallint
dim borneC2 as smallint
dim numerateur as string
dim denominateur as string

numerateur = "emission"
denominateur = "soumission"
borneA1 = 0
borneA2 = 33
borneB1 = 33
borneB2 = 66 
borneC1 = 66    
borneC2 = 100

cmd="shade bidule with ("+numerateur+"/"+denominateur+")*100 ranges apply all use all Brush (2,3253076,16777215) "+chr$(10)+
borneA1+":"+borneA2+"Brush (2,14096668,16777215) Pen (2,2,16777215) , "+chr$(10)+
borneB1+":"+borneB2+ "Brush (2,10934634,16777215) Pen (2,2,16777215) , "+chr$(10)+
borneC1+":" +borneC2+ "Brush (2,3253076,16777215) Pen (2,2,16777215) "+chr$(10)+
"default Brush (2,16777215,16777215) Pen (1,2,0) "+chr$(10)+
"# use 0 round 1 inflect on Brush (2,16776960,16777215) at 2 by 0 color 1 #"

print cmd
run command cmd

Bien content...
Pour les ressources, regardez ce qui est épinglé en tête du forum
Je ne peux en dire beaucoup plus, m'étant formé sur le tas...aidé par Georezo