Einzelnen Beitrag anzeigen

MGKV

Registriert seit: 27. Jun 2006
Ort: Magdeburg
15 Beiträge
 
Delphi 7 Professional
 
#1

Bilder drucken - Classenproblem

  Alt 15. Jul 2006, 15:06
Delphi-Quellcode:
procedure PrintBitmap(aGraphic: TGraphic, Title: string);
begin
  Printer.Title:=Title;
  Printer.BeginDoc;
  Printer.Canvas.Draw(0,0,aGraphic);
  Printer.EndDoc;
end;

procedure TMainForm.Button1Click(Sender: TObject);
begin
PrintBitmap(TJPEGImage,'Test');
end;
Warum geht das nicht? Was mache ich falsch?

[edit=Christian Seehase]Delphi-Tags gesetzt. Bitte künftig selber machen. Danke. Mfg, Christian Seehase[/edit]
  Mit Zitat antworten Zitat