关于DBGRIDEH点击标题进行打印的问题？

Question

DBGRIDEH点击标题可以进行打印，现在我想在窗体上
放一个按钮，把DBGRIDEH进行打印的功能，放在这个
按钮上，
按这个按钮对DBGRIDEH中的内容进行打印

Answer 1

I have a component, do u want get it. /

Answer 2

放一个PrintDBGridEh1控件，procedure TForm1.Button1Click(Sender: TObject);
begin
 PrintDBGridEh1.Print；
end;

Answer 3

uses Printersprocedure TForm1.Button1Click(Sender: TObject);
begin
 PrintDBGridEh1.Print；
end;

Answer 4

在 darkliu(钢铁工人甲) 的基础上加一点，
设置PrintDBGridEh1的DBGridEh属性为需要打印的DBGridEh