Beim Printer könntest du was optimieren, d.h.
TTabbedNoteBook hat TWinControl beerbt,
TObject
TPersistent
TComponent
TControl
-> TWinControl
TCustomTabControl
TTabbedNotebook
d.h. du kannst mit der Methode PainTo()
direkt auf das
Handle des Printers (Printer.Canvas.Handle) zugreifen.
Schau dir PaintTo() doch mal in der
OH an.
Ich hoffe das nützt dir was.
mytar