HorizontalAlignment for WTableCell not working

[Vince]

Hi,

I have a table with rows and cells. For the cells I want to set the HorizontalAlignment but is does not change the alignment. I use the next code:

    Dim row As WTableRow = table.AddRow()

    

    Dim cell As WTableCell = row.AddCell()

    cell.Width = 200

    cell.CellFormat.BackColor = Color.DarkBlue

    cell.CellFormat.Borders.BorderType = BorderStyle.None

    Call AlignCellContent(cell, VerticalAlignment.Middle, HorizontalAlignment.Right)

    cell.AddParagraph().AppendText("XXXXX")

    cell = row.AddCell()

    cell.Width = 200

    cell.CellFormat.BackColor = Color.DarkBlue

    cell.CellFormat.Borders.BorderType = BorderStyle.None

    Call AlignCellContent(cell, VerticalAlignment.Middle, HorizontalAlignment.Center)

    cell.AddParagraph().AppendText("YYYYY")

    Private Sub AlignCellContent(ByVal tableCell As WTableCell, ByVal verticalAlignment As VerticalAlignment, ByVal horizontalAlignment As HorizontalAlignment)

        tableCell.CellFormat.VerticalAlignment = verticalAlignment

        AlignCellContentForTextBody(tableCell, horizontalAlignment)

    End Sub

    Private Sub AlignCellContentForTextBody(ByVal textBody As WTextBody, ByVal horizontalAlignment As HorizontalAlignment)

        For i As Integer = 0 To textBody.ChildEntities.Count - 1

            Dim bodyItemEntity As IEntity = textBody.ChildEntities(i)

            Select Case bodyItemEntity.EntityType

                Case EntityType.Paragraph

                    Dim paragraph As WParagraph = TryCast(bodyItemEntity, WParagraph)

                    paragraph.ParagraphFormat.HorizontalAlignment = horizontalAlignment

                Case EntityType.Table

                    AlignCellContentForTable(TryCast(bodyItemEntity, WTable), horizontalAlignment)

                Case EntityType.BlockContentControl

                    Dim blockContentControl As BlockContentControl = TryCast(bodyItemEntity, BlockContentControl)

                    AlignCellContentForTextBody(blockContentControl.TextBody, horizontalAlignment)

            End Select

        Next

    End Sub

    Private Sub AlignCellContentForTable(ByVal table As WTable, ByVal horizontalAlignment As Syncfusion.DocIO.DLS.HorizontalAlignment)

        For Each row As WTableRow In table.Rows

            For Each cell As WTableCell In row.Cells

                AlignCellContentForTextBody(cell, horizontalAlignment)

            Next

        Next

    End Sub

[Manikandan Ravichandran]

Hi Vince,

Thank you for contacting Syncfusion support.

On further analyzing the given code example, we have found that you are trying to add the paragraph after the cell content alignment process. Since there is no paragraph present in the cell and alignment will not be applied. If you want to apply alignment to the paragraph inside the cell, we suggest you add a paragraph before the cell content alignment process. Based on your requirement and shared code example, we have prepared the sample which can be downloaded from the below link.
https://www.syncfusion.com/downloads/support/forum/151765/ze/VB347591285

Please let us know if you have any other questions.

Regards,
Manikandan Ravichandran

[Vince]

Thanks, that solved the problem!

[Vijayasurya Anandhan]

Hi Vince,

Thank you for your update and confirmation.

We are glad to know that the reported problem gets resolved. Please let us know if you need further assistance in this. As always, we will be happy to assist you. 

Please let us know if you have any questions.

Regards,
Vijayasurya A