|
Registriert seit: 27. Jun 2006
Ort: Magdeburg
15 Beiträge
Delphi 7 Professional
|
Bilder drucken - Classenproblem
15. Jul 2006, 16: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]
|