Annonce
#1 Tue 20 May 2008 12:37
- paris_ladéfense
- Participant occasionnel
- Date d'inscription: 16 Oct 2007
- Messages: 11
MapInfo v8.5 générer un atlas automatiquement
Bonjour,
Chaque mois je fait des mises à jour de cartes avec différents thèmes sur MapInfo.
Afin de me faciliter la tâche je souhaiterai automatiser cette procédure, pour qu'en ouvrant le .wor, je puisse avoir mes cartes sur tous les départements français, sans avoir à refaire le .wor à chaque fois.
Avez-vous des tuyaux à me donner à ce sujet?
Je vous remercie!
Hors ligne
#2 Tue 20 May 2008 13:06
- Maurice
- Membre
- Lieu: Montpellier
- Date d'inscription: 5 Sep 2005
- Messages: 5331
Re: MapInfo v8.5 générer un atlas automatiquement
Bonjour
Tant que les départements ne changent pas....vous pouvez vous fabriquer un WOR "modèle" dans lequel vous glissez les instructions ad-hoc
Modèle: il ne peut être enregistré sans perdre ces instructions
Instructions: des choses genre (à titre d'exemple)
Set Map
.....
Dim numero as integer
fetch Rec 1 from Dept
numero=Dept.rowid
select * from Dept where rowid=numero into __seltable
add map layer __seltable
set map zoom entire layer __seltable
Set Map Clipping Object __seltable.obj Using Display All
close table __seltable
Set Window FrontWindow() Title "Dept 1"
puis
Layout
...
Dim textedept as string
Select nom_dept from Dept where rowid=1 into nomdept
textedept = textedept.nom_dept
...
Create Text
" Département : "+textedept
...
Create Text into window frontwindow() "1 : "+Format$(Round(mapperinfo(windowid(1),1)/19.674332,100), ",#")
...
Set Window FrontWindow() Title "Carte "+textedept
UnDim textedept
Close Table nomdept
etc...
Hors ligne
