Delphi: How can I print the contents of a DBGrid or ADOQeury?

Delphi: How can I print the contents of a DBGrid or ADOQeury?

On the program I am working on for a school project, there is a results
page which displays the contents of a database in a DBGrid using a
ADOQuery component. I have a button on the page which when I click it, it
should print whatever the contents of the DBGrid is with a printer.
The printer setup is already done with a PrintDialog component, I know how
to do that part, the problem is finding a way to print the contents of
DBGrid.
Is this possible? If it is, how? Thanks in advance for any help in this
matter.