Re: Druckausgabe

[Jens-Peer Kuska <kuska@XXXXXXX.de>]

Hallo,

ich weiss nicht ob Dir das gef"allt,
aber Du must eine Text-Zelle mit BoxData[]
erzeugen und dieser Text-Zelle  die Option
 TextAlignment->Center geben.

Das sieht dann 
 
Cell[BoxData[Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: .61803 
%%%% bla bla noch mehr PostScript
%%%% SCHIPP SCHNAPP
%%%%
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      ImageSize->{288, 177.938},
      ImageMargins->{{0, 0}, {0, -1}},
      ImageRegion->{{0, 1}, {0, 1}}]], "Text",
  TextAlignment->Center]

Gruss
  Jens

Jochen Haller wrote:
> 
> Hallo Liste!
> 
> Hab eine kleine Frage zur Druckausgabe.
> 
> Ich habe ein Graphik welche ich drucken möchten. Was muß ich einstellen,
> damit die Graphik zentriert gedruckt wird (unter Ausnutzung des gesamten
> Blattes) ohne daß ein Teil der Graphik abgeschnitten wird (so wie bei
> mir geschehen)?
> 
> MfG
> 
> Jochen Haller
> 
> --------------------------------------------
> Dipl.-Kfm. Jochen Haller
> 
> Institut für Volkswirtschaftslehre und Recht
> Abteilung für Mikroökonomik
> Keplerstraße 17, 10. OG
> 
> 70174 Stuttgart
> 
> 0711 121-3557
> 0711 121-2450 (FAX)
> 
> haller@XXXXXXX.de
> 
> http://www.sofo.uni-stuttgart.de/mikro/haller.html