Lazarus
Home
Help
TinyPortal
Search
Login
Register
Lazarus
»
Forum
»
Programming
»
General
»
How to print a DrawGrid
Free Pascal
Website
Downloads
Wiki
Documentation
Bugtracker
Mailing List
Lazarus
Website
Downloads (Laz+FPC)
Packages (OPM)
FAQ
Wiki
Documentation (RTL/FCL/LCL)
Bugtracker
CCR Bugs
GIT
Mailing List
Other languages
Foundation
Website
Useful Wiki Links
Project Roadmap
Getting the Source
Screenshots
How to use the forum
About donations (wiki)
Bookstore
Computer Math and Games in Pascal
(preview)
Lazarus Handbook
Search
Advanced search
Recent
IsNan
by
Paolo
[
Today
at 09:34:34 am]
Why free pascal suppress ...
by
runewalsh
[
Today
at 09:22:50 am]
TmemTable has not onCalcF...
by
egsuh
[
Today
at 08:46:27 am]
Failed to connect to a si...
by
egsuh
[
Today
at 08:26:42 am]
Reading and writing AVIF ...
by
Okoba
[
Today
at 08:25:04 am]
Simple mouse solution for...
by
Lauriet
[
Today
at 08:15:34 am]
Scrollbox, scrollbar Back...
by
ASerge
[
Today
at 08:14:46 am]
"extended" real type prec...
by
LV
[
Today
at 06:48:44 am]
Treeview: full-width back...
by
wp
[
Today
at 01:03:20 am]
FPC can't link screen_dem...
by
mccfrank
[
Today
at 12:06:32 am]
ThemeServices.DrawText in...
by
regs
[February 08, 2025, 11:25:01 pm]
my programs crash
by
turunk
[February 08, 2025, 10:56:26 pm]
Gradient with fcl-image
by
wp
[February 08, 2025, 10:46:18 pm]
using RunCommand to wrap ...
by
nomorelogic
[February 08, 2025, 10:39:37 pm]
ellipse ? off topic
by
BubikolRamios
[February 08, 2025, 10:15:18 pm]
FLIF and FUIF Formats (Fr...
by
Tomxe
[February 08, 2025, 09:43:37 pm]
Reading FLIF images in La...
by
Tomxe
[February 08, 2025, 09:43:03 pm]
Basic canvas drawing
by
Jonny
[February 08, 2025, 09:31:17 pm]
Transparent animation
by
majolika
[February 08, 2025, 08:17:52 pm]
API definitions
by
440bx
[February 08, 2025, 07:35:57 pm]
Candlestick chart
by
ronhud
[February 08, 2025, 07:31:12 pm]
missed warning
by
Paolo
[February 08, 2025, 07:30:04 pm]
Error assembling some lab...
by
Fred vS
[February 08, 2025, 07:10:13 pm]
Building the FPC cross-co...
by
marcov
[February 08, 2025, 07:09:09 pm]
HelpNDoc.com and Pascal
by
paule32
[February 08, 2025, 06:42:02 pm]
« previous
next »
Print
Pages: [
1
]
Author
Topic: How to print a DrawGrid (Read 1298 times)
bobonwhidbey
Hero Member
Posts: 616
How to print a DrawGrid
«
on:
December 01, 2023, 06:42:08 pm »
The TDrawGrid looks good on my monitor but I haven't figured out how to print it on the printer canvas. I think my biggest problem is getting aRect, although there's a good chance I'm going about this all wrong.
Code: Pascal
[Select]
[+]
[-]
procedure
TMyForm
.
PrintClick
(
Sender
:
TObject
)
;
var
c
,
r
:
integer
;
aRect
:
TRect
;
begin
if
PrinterSetup
.
Execute
then
begin
Printer
.
BeginDoc
;
for
c
:
=
0
to
Grid
.
ColCount
-
1
do
for
r
:
=
0
to
Grid
.
RowCount
-
1
do
begin
aRect
:
=
Grid
.
CellRect
(
c
,
r
)
;
DrawCelltoCanvas
(
Printer
.
Canvas
,
c
,
r
,
aRect
,
[
]
)
;
end
;
// for c & r
Printer
.
EndDoc
;
end
;
// printer executed
end
;
Logged
Lazarus 3.6 FPC 3.2.2 x86_64-win64-win32/win64
paweld
Hero Member
Posts: 1293
Re: How to print a DrawGrid
«
Reply #1 on:
December 01, 2023, 07:08:06 pm »
GridPrinter:
https://wiki.lazarus.freepascal.org/GridPrinter
Logged
Best regards / Pozdrawiam
paweld
bobonwhidbey
Hero Member
Posts: 616
Re: How to print a DrawGrid
«
Reply #2 on:
December 04, 2023, 04:34:00 pm »
I haven't been able to figure out how to use the GridPrinter with a TDrawGrid. The (quite good) documentation doesn't mention use with a TDrawGrid. What am I missing?
Logged
Lazarus 3.6 FPC 3.2.2 x86_64-win64-win32/win64
wp
Hero Member
Posts: 12589
Re: How to print a DrawGrid
«
Reply #3 on:
December 04, 2023, 04:42:19 pm »
I cannot remember every detail of that component, but you probably must provide a handler for the OnGetCellText event in which you tell the printer the text to be printed in a specific cell.
Or is it non-text printing you are after? In this case provide a small demo project showing the grid to be printed.
Logged
bobonwhidbey
Hero Member
Posts: 616
Re: How to print a DrawGrid
«
Reply #4 on:
December 04, 2023, 05:37:26 pm »
I am printing text but I also need to control the font name and size in each cell.
In my DrawGrid onDrawCell I use my own FillRect and TextDraw, etc. I discovered that the GridPrinter needs the OnPrintCell method. Thanks wp for getting me to look further under the hood.
Logged
Lazarus 3.6 FPC 3.2.2 x86_64-win64-win32/win64
bobonwhidbey
Hero Member
Posts: 616
Re: How to print a DrawGrid
«
Reply #5 on:
December 04, 2023, 10:31:10 pm »
One last point. How do I trigger a new page. Not needed when viewing the Grid but needed when printing. I can't use Printer.NewPage.
Logged
Lazarus 3.6 FPC 3.2.2 x86_64-win64-win32/win64
wp
Hero Member
Posts: 12589
Re: How to print a DrawGrid
«
Reply #6 on:
December 04, 2023, 11:29:20 pm »
Page breaks are determined by the component, when a row or column does not fit on the current page any more. IIRC, there is no way to manually trigger a page break. This does not mean that it's not possible, but it certainly will require some work.
Logged
Print
Pages: [
1
]
« previous
next »
Lazarus
»
Forum
»
Programming
»
General
»
How to print a DrawGrid
TinyPortal
© 2005-2018