Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Druckervorschau

    Delphi
    by Thunderman, 23. Jan 2005
  Hallo!
  
  Das mit auf einer Form zeichnen ändert in diesem Falle nichts, da das Canvas des TPrinter Objekts ein anderes Format hat. Wennn es überhaupt geht, muss man wahrscheinlich das ganze in etwa so lösen:
  var
  h_DC, hdc_mem, temp : HDC;
  begin
  h_DC := GetDC(Form1.Handle);
  hdc_mem := CreateCompatibleDC(h_DC);
  temp := SelectObject(hdc_mem, Printer.Canvas.Handle);
  BitBlt(h_DC, 0,...
• Forum: Object-Pascal / Delphi-Language

  Re: Druckervorschau

    Delphi
    by Thunderman, 22. Jan 2005
  Wenn man auch lesend auf das Canvas des TPrinter Objektes zugreifen kann, wovon ich mal ausgehe, sollte das schon gehen. Theoretisch sollte das in etwa so aussehen, wenn du z.Bsp. auf das TForm-Objekt Form1 zeichnen willst:
  BitBlt(Form1.Canvas.Handle, 0, 0, breite, hoehe, printer.Canvas.Handle, 0, 0, SRCCOPY);
  Sofern dein Canvas Objekt natürlich die notwendige Breite und Höhe besitzt sollte das...
• Forum: Object-Pascal / Delphi-Language

  Re: Druckervorschau

    Delphi
    by Thunderman, 20. Jan 2005
  Oder über das Handle der Canvas-Objekte direkt mit den Funktionen der WinAPI mit BitBlt oder StretchBlt. Siehe dazu dann sonst im MSDN nach.