Drukowanie?

procedure TEditForm.Printersetup1Click(Sender: TObject);

begin

PrinterSetupDialog1.Execute;

end;

procedure TEditForm.Print1Click(Sender: TObject);

begin

if PrintDialog1.Execute then

Editor.Print(PathName);

end;