How to: Modify Brick Appearance using Styles

using DevExpress.XtraPrinting;
// ...


printingSystem1.Begin();

// Specify the style definitions.
BrickStyle column_style1 = new BrickStyle(BorderSide.Left | BorderSide.Bottom | BorderSide.Top, 2,
    Color.Gold, Color.Navy, Color.DodgerBlue, new Font("Arial", 6, FontStyle.Bold |
    FontStyle.Italic), new BrickStringFormat(StringAlignment.Near, StringAlignment.Near));
BrickStyle column_style2 = new BrickStyle(BorderSide.Top | BorderSide.Bottom, 2,
    Color.Navy, Color.DodgerBlue, Color.Gold, new Font("Arial", 6, FontStyle.Bold |
    FontStyle.Italic), new BrickStringFormat(StringAlignment.Center, StringAlignment.Center));
BrickStyle column_style3 = new BrickStyle(BorderSide.Right | BorderSide.Bottom | BorderSide.Top, 2,
    Color.DodgerBlue, Color.Gold, Color.Navy, new Font("Arial", 6, FontStyle.Bold |
    FontStyle.Italic), new BrickStringFormat(StringAlignment.Far, StringAlignment.Far));

BrickGraphics gr = printingSystem1.Graph;
gr.Modifier = BrickModifier.Detail;
string s = "XtraPrinting Library";
TextBrick t_brick;

// Draw the first column and apply the style.
for (int i = 0; i < 3; i++) {
    t_brick = gr.DrawString(s, new RectangleF(0, 20 * i, 100, 20));
    t_brick.Style = column_style1;
}

// Draw the second column and apply the style.
for (int i = 0; i < 3; i++) {
    t_brick = gr.DrawString(s, new RectangleF(100, 20 * i, 100, 20));
    t_brick.Style = column_style2;
}

// Draw the first column and apply the style.
for (int i = 0; i < 3; i++) {
    t_brick = gr.DrawString(s, new RectangleF(200, 20 * i, 100, 20));
    t_brick.Style = column_style3;
}

printingSystem1.End();
printingSystem1.PreviewFormEx.Show();

Imports DevExpress.XtraPrinting
' ...


printingSystem1.Begin()

' Specify the style definitions.
Dim column_style1 As BrickStyle = New BrickStyle(BorderSide.Left Or BorderSide.Bottom Or _
    BorderSide.Top, 2, Color.Gold, Color.Navy, Color.DodgerBlue, New Font("Arial", 6, _
    FontStyle.Bold Or FontStyle.Italic), New BrickStringFormat(StringAlignment.Near, _
    StringAlignment.Near))

Dim column_style2 As BrickStyle = New BrickStyle(BorderSide.Top Or BorderSide.Bottom, 2, _
    Color.Navy, Color.DodgerBlue, Color.Gold, New Font("Arial", 6, FontStyle.Bold Or _
    FontStyle.Italic), New BrickStringFormat(StringAlignment.Center, StringAlignment.Center))

Dim column_style3 As BrickStyle = New BrickStyle(BorderSide.Right Or BorderSide.Bottom Or _
    BorderSide.Top, 2, Color.DodgerBlue, Color.Gold, Color.Navy, New Font("Arial", 6, _
    FontStyle.Bold Or FontStyle.Italic), New BrickStringFormat(StringAlignment.Far, _
    StringAlignment.Far))

Dim gr As BrickGraphics = printingSystem1.Graph
gr.Modifier = BrickModifier.Detail
Dim s As String = "XtraPrinting Library"
Dim t_brick As TextBrick

' Draw the first column and apply the style.
For i As Integer = 0 To 2
    t_brick = gr.DrawString(s, New RectangleF(0, 20*i, 100, 20))
    t_brick.Style = column_style1
Next i

' Draw the second column and apply the style.
For i As Integer = 0 To 2
    t_brick = gr.DrawString(s, New RectangleF(100, 20*i, 100, 20))
    t_brick.Style = column_style2
Next i

' Draw the first column and apply the style.
For i As Integer = 0 To 2
    t_brick = gr.DrawString(s, New RectangleF(200, 20*i, 100, 20))
    t_brick.Style = column_style3
Next i

printingSystem1.End()
printingSystem1.PreviewFormEx.Show()