#1 Thu 28 August 2003 14:13
- Ariane Vallat
- Invité
Mise a jour automatique de date
Bonjour la liste,
J'ai des mises en page MI que je dois reimprimer souvent, avec la date d'impression.
Chaque fois je dois modifier cette date manuellement et donc j'aimerais savoir s'il est possible, dans une fenetre mise en page, de positionner une date du jour automatiquement ?
Merci d'avance pour vos reponses
VALLAT Ariane
Service Espaces Verts
Ville de Venissieux
Courriel : avallat@ ville-venissieux.fr
#2 Thu 28 August 2003 16:20
- Jacques Paris
- Invité
Re: Mise a jour automatique de date
Voici une facon de le faire qui devra etre adaptee a chaque cas
Dans la fenetre mapbasic
set coordsys layout units cm
create text into window frontwindow() formatdate(curdate()) (12,2) (16,3)
La date aura le format defini dans les parametres regionaux de Windows.
(12,2) sont les coordonnees du point d’ancrage du texte (coin superieur
gauche), dans (16,3) 3 qui est le deuxieme y de la boite de texte fixe la
hauteur du texte par difference avec le premier (ici hauteur de 1) La
deuxieme valeur de x (16) est pratiquement pas importante sauf pour des
mise-en-pages requerant un alignement a droite.
Vous pouvez aussi introduire ces commandes dans le document wor qui pourrait
generer ces cartes.
Jacques Paris
#3 Thu 28 August 2003 17:56
- Rictrem
- Invité
Re: Mise a jour automatique de date
De: Richard Tremblay
Bonjour,
Pour completer cette reponse, voici comment je procede. Si quelqu'un procede autrement, ce serait interessant d'approfondir la chose.
Vous inserez une zone de texte dans votre mise en page, par exemple Date :
Vous editez le workspace et vous localisez votre zone de texte qui ressemblera a ceci :
Layout
Position (0.0520833,0.0520833) Units in
Width 5.29167 Units in Height 3.10417 Units in
Set CoordSys Layout Units in
Create Text
Date :
(2.3847,3.6139) (2.9215,3.8438)
Font ( Arial ,1,14,0)
Vous ajoutez une fonction qui retourne la date apres le guillemet fermant ce qui vous donnera ceci
Layout
Position (0.0520833,0.0520833) Units in
Width 5.29167 Units in Height 3.10417 Units in
Set CoordSys Layout Units in
Create Text
Date : +Format(CurDate(), ####/##/## )
(2.3847,3.6139) (2.9215,3.8438)
Font ( Arial ,1,14,0)
Lorsque vous ouvrirez le workspace avec Mapinfo la date sera toujours actualisee. Cette fonction est volatile, Mapinfo ne la conserve pas si vous enregistrez votre workspace, un petit defaut.
Vous pouvez egalement par ce moyen inserer le chemin du workspace avec la formule suivante :
+TrueFileName( C:nomworkspace.wor )
ou les parametres a ecrire sont ( [lecteur], [Nom du fichier] )
Salutations
Richard Tremblay