Also problems with borders in table with 6.17

  • Julian,

    I am having the same problem as Martincho with the 6.17 version. I use a table that is created in code:

    par := par.AppendNewTable; // a new table
    par.ASet(WPAT_BoxWidth, FRichText.Header.PageWidth-FrichText.Header.RightMargin-FRichText.header.leftmargin);
    row := par.AppendNewRow(false);

    cell := row.AppendNewCell;
    cell.align := Alignment;
    Cell.aDel(WPAT_ColWidth);
    Cell.aSet(WPAT_ColWidth_PC, Size);
    cell.SetText(aString, aAttr);
    if WithBorders then
    Cell.ASet(WPAT_BorderFlags, (integer(cellcount=0)*WPBRD_DRAW_Left)+ (integer(NewTable)*WPBRD_DRAW_Top)+WPBRD_DRAW_Right+WPBRD_DRAW_Bottom);

    When I print the table, the vertical borders go 1 pixel to far down.

    is there another way to create tables with borders in 6.17 due to your changes?

    I also replied to Martincho his post but since you stated that you would not reply to that mail, I figured to best make a new thread.