CellProperties, VAlignment , vs OnGetAlignment

VCL TMS VCL UI Pack
1

I can set FontName, FontSize, FontStyle, FontColor, BrushColor, and Alignment (horizontal) using CellProperties, and as far as I can tell, that works correctly.
But VAlignment doesn't work. What am I doing wrong?

I read somewhere that it should work via OnGetAlignment, but that was in a different place, so I don't have that information anymore.

It would be really cool if VAlignment worked too.

        if GetBitUI8(Projekt.CalcPDFFm[tmceFmIdx].Layout,cly_Right) then
          pdf_StrGr.CellProperties[ACol,ARow].Alignment  := taRightJustify;
        if GetBitUI8(Projekt.CalcPDFFm[tmceFmIdx].Layout,cly_CentH) then
          pdf_StrGr.CellProperties[ACol,ARow].Alignment  := taCenter;

if GetBitUI8(Projekt.CalcPDFFm[tmceFmIdx].Layout,cly_Bott) then
pdf_StrGr.CellProperties[ACol,ARow].VAlignment := vtaBottom;
if GetBitUI8(Projekt.CalcPDFFm[tmceFmIdx].Layout,cly_CentV) then
pdf_StrGr.CellProperties[ACol,ARow].VAlignment := vtaCenter;

pdf_StrGr.CellProperties[ACol,ARow].FontName := Projekt.CalcPDFFm[tmceFmIdx].Font.Name;
pdf_StrGr.CellProperties[ACol,ARow].FontSize := Projekt.CalcPDFFm[tmceFmIdx].Font.Size;
pdf_StrGr.CellProperties[ACol,ARow].FontStyle := Projekt.CalcPDFFm[tmceFmIdx].Font.Style;

pdf_StrGr.CellProperties[ACol,ARow].FontColor := Projekt.CalcPDFFm[tmceFmIdx].FontColor;
pdf_StrGr.CellProperties[ACol,ARow].BrushColor := Projekt.CalcPDFFm[tmceFmIdx].HintColor;

2

I need this for a PDF output is OnGetAlignment not called at all in that case?

TMSPDF
TMSPDF1732×1321 285 KB

3

For vertical alignment, this needs to be set through the event handler OnGetAlignment() and also make sure to set grid.WordWrap := false, as wordwrapped text is always drawn top aligned.

4

OnGetAlignment() does not respond

I need that with TAdvStringGrid / TAdvGridPDFIO

image

image
image1599×101 5.73 KB

7

At this moment, it isn't supported at PDF level. We put it on our todolist to investigate to add support for a future version.

8

Okay,

is there perhaps a temporary solution?
I'm already doing this with the grid lines in AfterDrawContent.
Could you suggest a solution for the text?

grid lines:
That would also be a useful feature: Transferring the line color/style/width from the grid to the PDF.

9

Using custom drawing would be the only alternative I can think of.
We'll also put line colors on the todolist.