Member 13102568 Ответов: 0

Как установить пользовательские размеры для печати формы в delphi


У меня есть форма, которую мне нужно, чтобы пользователь мог распечатать, но я хочу, чтобы была напечатана только определенная область формы. Есть ли способ, которым я могу выбрать определенный регион (без необходимости для пользователя) и только распечатать его?

Что я уже пробовал:

procedure TForm1.Button1Click(Sender: TObject);
var
  printDialog : TPrintDialog;
  myPrinter   : TPrinter;
begin
printDialog := TPrintDialog.Create(Form1);
if printDialog.Execute then
  begin
    Printer.Orientation := poLandscape;    
    Form1.PrintScale:=poPrintToFit;        

    Form1.Print;

  end;
end;

0 Ответов