How do I set custom dimensions for printing a form in delphi

See more:

printing

Delphi

Pascal

print

I have a form which I need the user to be able to print but I only want a certain region of the form printed. Is there a way I can select a certain region (without the user having to) and only print that?

What I have tried:

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;