Is it possible to set Callout Brush to be Transparent?

psc · Post by **psc** » Mon Dec 18, 2006 1:39 pm

I'm trying to set the callout brush to be transparent at run time via code. Is this possile? I am using the following code. I'd like a green hollow circle as the callout. I can set the brush to any colour apart from transparent.

Code: Select all


    With TChart1.Tools.Items(0).asAnnotation.Callout
            .Arrow.Visible = True
            .Arrow.Color = vbBlue
            .Style = psCircle
            .Visible = True
            .VerticalSize = 6
            .HorizontalSize = 6
            
            .Brush.Style = bsSolid
            .Brush.Color = clNone 'This does not set it to be transparent
           
           .Pen.Color = vbGreen
           .Pen.Style = psSolid
           .Pen.Width = 2

    End With

Narcís · Post by **Narcís** » Mon Dec 18, 2006 2:36 pm

Hi psc,

You can try setting its brush to bsClear:

Code: Select all

    With TChart1.Tools.Items(0).asAnnotation.Callout
            .Arrow.Visible = True
            .Arrow.Color = vbBlue
            .Style = psCircle
            .Visible = True
            .VerticalSize = 6
            .HorizontalSize = 6

            .Brush.Style = bsClear
           
           .Pen.Color = vbGreen
           .Pen.Style = psSolid
           .Pen.Width = 2
    End With

psc · Post by **psc** » Mon Dec 18, 2006 2:39 pm

Great thanks a lot for response.