Forum: Win32/Win64 API (native code)
by Metallicwar,
13. Sep 2010
ich Depp ^^ :D
begin
with Printer do
begin
BeginDoc;
try
bitmapFormular := Formular.GetFormImage;
X := (Printer.PageWidth - bitmapFormular.Width) div 2;
Y:= (Printer.PageHeight - bitmapFormular.Height) div 2;
Forum: Win32/Win64 API (native code)
by Metallicwar,
13. Sep 2010
habs mit folgender procedure versucht:
procedure SetCanvasZoomFactor(Canvas: TCanvas; AZoomFactor: Integer);
begin
if AZoomFactor = 100 then
SetMapMode(Canvas.Handle, MM_TEXT)
else
begin
SetMapMode(Canvas.Handle, MM_ISOTROPIC);
SetWindowExtEx(Canvas.Handle, 100,100, nil);
SetViewportExtEx(Canvas.Handle,AZoomFactor, AZoomFactor, nil);
Forum: Win32/Win64 API (native code)
by Metallicwar,
13. Sep 2010
Hab mal wieder einen Hänger :)
var
x, y: Integer
begin
with Printer do
begin
BeginDoc;
Forum: Win32/Win64 API (native code)
by Metallicwar,
13. Sep 2010
http://www.delphipraxis.net/136035-bild-zentriert-ausdrucken.html
Ein ähnliches Thema, ihm konnte auch nicht weitergeholfen werden...
Zurück zu meinem: In der Hilfe steht einiges... doch ich finde nichts passendes zu meinem Problem. (vll hab ich auch was übersehen)
Zu den Optionen, dass habe ich in der Hilfe gefunden: begin
PrintDialog1.Options := ;
TPrintDialogOption = (
Forum: Win32/Win64 API (native code)
by Metallicwar,
13. Sep 2010
ich drucke einfach über Formular.Print
werd ich mal nachschaun
Forum: Win32/Win64 API (native code)
by Metallicwar,
13. Sep 2010
Hallo zusammen.
Mein Programm druckt mir ein Formular aus, auf dem sich mehrere Frames befinden.
Das Formular wird aber "NORMAL" ausgedruckt. Ich möchte dass mein Formular zentriert oder mittig ausgedruckt wird.
Gibt es dazu eine mitgelieferte Funktion, oder muss ich selbst was schreiben *hoff* :)