简单问题,如何调用PrintDialog然后直接把当前窗口给打印出来?

Question

简单问题,如何调用PrintDialog然后直接把当前窗口(包括当前窗口上的所有控件)给打印出来?

Answer 1

procedure TForm1.btn1Click(Sender: TObject);
begin
  Self.Print;
end;

Answer 2

我知道Self.Print;
但是没有调用PrintDialog啊,
而且如何在打印的时候选择窗口的打印区域?

Answer 3

Self.Print直接就打印了,我的问题是'用PrintDialog然后直接把当前窗口给打印出来? '
是如何先调用PrintDialog,并根据PrintDialog的设置打印?