banniere

Le portail francophone de la géomatique


Toujours pas inscrit ? Mot de passe oublié ?
Nom d'utilisateur    Mot de passe              Toujours pas inscrit ?   Mot de passe oublié ?

#1 Mon 07 February 2011 10:02

Marie75
Participant occasionnel
Date d'inscription: 18 Apr 2009
Messages: 13

Impossible d'insérer un objet cadre dans une carte

Bonjour,

Toujours dans le cadre de ma production automatique de carte, mapinfo avec mon programme arrive à produire d'affilée un certain nombre de carte (5-6) mais apres le message d'erreur suivant apparait :"Impossible d'insérer un objet cadre dans une carte". mOn bout de code concernant la partie "Create frame" est la suivante :

Sub carte
Layout
  Position (0.270833,0.364583) Units "in"  Width 6.625 Units "in" Height 4.47917 Units "in"
  Dim uniqueStringName As String
  uniqueStringName = "Set " + SessionInfo(1)
  Set CoordSys Layout Units "in"
  Create Frame (0.3806,0.291) (11.2271,6.6229)    Pen (1,1,0)     Brush (2,13693183,16777215)    Title "carte"    FillFrame Off
  Create Frame (0.7382,6.7486) (11.3944,8.0507)    Pen (1,1,0)     Brush (2,16777215,16777215)    Title "Légende de carte:2"    FillFrame Off
  Create Rect (0.3389,0.2389) (11.2868,8.0847)    Pen (1,2,0)     Brush (1,16777215,16777215) 
  Set Layout Ruler On Pagebreaks On Frame Contents Active
  Zoom 34.9169 Center (8.87044,5.84722) Extents To Fit
  Set Window FrontWindow() Autoscroll On 
  Run Command uniqueStringName
    Set Window FrontWindow() Printer
    Name "\\montreal\Xerox WorkCentre 7335 PS" Orientation Landscape Copies 1 Papersize 9
   
End Sub

Merci d'avance pour vos conseils !
Marie

Hors ligne

 

#2 Mon 07 February 2011 22:28

Maurice
Membre
Lieu: Montpellier
Date d'inscription: 5 Sep 2005
Messages: 5331

Re: Impossible d'insérer un objet cadre dans une carte

Bonjour
Il semble que le  Create Frame ne s'applique pas à la fenêtre Layout ...
Il faudrait utiliser un  Create Frame Into Window layout_win_id ... et donc récupérer avant le layout_win_id, au moment de la création du layout, par FrontWindow() ou WindowID()

Hors ligne

 

#3 Tue 08 February 2011 13:27

Marie75
Participant occasionnel
Date d'inscription: 18 Apr 2009
Messages: 13

Re: Impossible d'insérer un objet cadre dans une carte

Merci maurice pour ton aide, Voilà ce que j'ai fait mais ca ne fonctionne toujours pas...



Sub carte
Layout
  Position (0.270833,0.364583) Units "in"  Width 6.625 Units "in" Height 4.47917 Units "in"
 
  Dim uniqueStringName As String, layout_win_id as string
  layout_win_id=FrontWindow()
  uniqueStringName = "Set " + SessionInfo(1)
  Set CoordSys Layout Units "in" 
  Create Frame Into Window layout_win_id(0.3806,0.291) (11.2271,6.6229)    Pen (1,1,0)     Brush (2,13693183,16777215)    Title "carte"    FillFrame Off
  Create Frame Into Window layout_win_id (0.7382,6.7486) (11.3944,8.0507)    Pen (1,1,0)     Brush (2,16777215,16777215)    Title "Légende de carte:2"    FillFrame Off
  Create Rect Into Window layout_win_id (0.3389,0.2389) (11.2868,8.0847)    Pen (1,2,0)     Brush (1,16777215,16777215) 
  Set Layout Ruler On Pagebreaks On Frame Contents Active
  Zoom 34.9169 Center (8.87044,5.84722) Extents To Fit
  Set Window FrontWindow() Autoscroll On 
  Run Command uniqueStringName
    Set Window FrontWindow() Printer
    Name "\\montreal\Xerox WorkCentre 7335 PS" Orientation Landscape Copies 1 Papersize 9
   
End Sub

Hors ligne

 

Pied de page des forums

Powered by FluxBB