Hallo Forum!
Ich habe folgendes Problem:
Mit Hilfe eines Scriptes (siehe unten) versuche ich, automatisch Kartenausschnitte aus einem Layout als jpg exportieren zu lassen. Dies funktioniert auch einwandfrei, jedoch werden die jpg's immer mit der zu geringen Standardauflösung von 96 dpi erstellt. Beim "manuellen" Exportieren erscheint ein Dialogfeld, in dem es möglich ist, die Auflösung zu erhöhen.
Nun meine Frage: Wo und wie kann ich in dem Script die Auflösung der zu exportierenden jpg's beeinflussen?
Besten Dank vorab!
Frank
'------------------------
'Exportieren des Layouts
theLayout = av.GetActiveDoc
theFormat = "JPEG"
theFileName = theDateiName.AsFileName
theExportDisplay =
theLayout.GetDisplay.ExportStartFN(theFileName, theFormat)
theExportDisplay.Invalidate(FALSE)
theLayout.GetGraphics.SetDisplay(theExportDisplay)
theLayout.GetGraphics.Draw
theLayout.GetGraphics.SetDisplay(theLayout.GetDisplay)
theExportDisplay.ExportEnd
'--------------
Ich habe folgendes Problem:
Mit Hilfe eines Scriptes (siehe unten) versuche ich, automatisch Kartenausschnitte aus einem Layout als jpg exportieren zu lassen. Dies funktioniert auch einwandfrei, jedoch werden die jpg's immer mit der zu geringen Standardauflösung von 96 dpi erstellt. Beim "manuellen" Exportieren erscheint ein Dialogfeld, in dem es möglich ist, die Auflösung zu erhöhen.
Nun meine Frage: Wo und wie kann ich in dem Script die Auflösung der zu exportierenden jpg's beeinflussen?
Besten Dank vorab!
Frank
'------------------------
'Exportieren des Layouts
theLayout = av.GetActiveDoc
theFormat = "JPEG"
theFileName = theDateiName.AsFileName
theExportDisplay =
theLayout.GetDisplay.ExportStartFN(theFileName, theFormat)
theExportDisplay.Invalidate(FALSE)
theLayout.GetGraphics.SetDisplay(theExportDisplay)
theLayout.GetGraphics.Draw
theLayout.GetGraphics.SetDisplay(theLayout.GetDisplay)
theExportDisplay.ExportEnd
'--------------
- Anmelden oder Registieren, um Kommentare verfassen zu können
Gespeichert von Gast am Di., 06.04.2004 - 09:40
Permalinkversuch es mal damit:
aLayout.exporttofile(fname, "JPEG", {96,100})
1. Parameter = Filename
2. Parameter = eines der verfügbaren Exportformate
3. Parameter = Liste der Exportparameter, unterschiedlich je nach Exportformat
Kann es sein das du mit deinem Script nur die Bildschirmansicht exportiertst und nicht das Layout oder? Probier es mal damit:
theLayout = av.GetActiveDoc
w = theLayout.GetWin
w.open
theLayout.ExportToFile(fname, "JPEG", {96,100})
w.close
Hoffe geholfen zu haben. Gruß.
Andreas