Hide

SftBox/OCX 5.0 - Combo Box Control

Display
Print

SftBoxHeader.Image Property

Defines the graphic displayed in this column header.

Syntax

Get

VB.NETrefImageObj = object.Image As SftPictureObject
VBSet refImageObj = object.Image As SftPictureObject
C#.NETSftPictureObject refImageObj = object.Image;
VC++ISftPictureObject* refImageObj = object->Image;
ISftPictureObject* refImageObj = object->GetImage();
CHRESULT object->get_Image(ISftPictureObject** refImageObj);

Put

VB.NETobject.Image = refImageObj As SftPictureObject
VBobject.Image = refImageObj As SftPictureObject
C#.NETSftPictureObject object.Image = refImageObj;
VC++ISftPictureObject* object->Image = refImageObj;
void object->PutImage(ISftPictureObject* refImageObj);
CHRESULT object->put_Image(ISftPictureObject* refImageObj);

object

A SftBoxHeader object.

refImageObj

Defines the graphic displayed in this column header.

Comments

The Image property defines the graphic displayed in this column header.

All column header graphics (i.e. all bitmaps) must be the same size (height and width). The dimensions of the graphics are used to calculate the minimum required height for all column headers (and row/column header), so graphics and text are never clipped vertically. To change the size of all header graphics used, they must be removed first using the Headers.ClearImages method.

If the image object refImageObj defines a bitmap, the top, left pixel of the bitmap must contain the bitmap's background color. This color will be replaced throughout the bitmap with the actual background (see Bitmap Transparency).

To remove an individual header picture, set the property to Nothing (0, null, NULL).

The position of the graphic relative to the text component can be defined using the Header.ImageHAlign and Header.ImageVAlign properties.

Examples

VB.NET

    ItemIndex = AxSftBox1.Items.Selection
    If ItemIndex < 0 Then Exit Sub

    ' don't use images that are too large in the other areas
    Img = AxSftBox1.get_Cell(ItemIndex, 0).Image
    If Img.ActualHeight <= 20 And Img.ActualWidth <= 20 Then
        AxSftBox1.RowColumnHeader.Image = Img
        AxSftBox1.get_Header(1).Image = Img
    Else
        AxSftBox1.RowColumnHeader.Image.Clear()
        AxSftBox1.get_Header(1).Image.Clear()
    End If
End Sub

Private Sub ToggleImage(ByVal Img As SftPictureObject)

VB6

    ItemIndex = SftBox1.Items.Selection
    If ItemIndex < 0 Then Exit Sub

    ' don't use images that are too large in the other areas
    Set Img = SftBox1.Cell(ItemIndex, 0).Image
    If Img.ActualHeight <= 20 And Img.ActualWidth <= 20 Then
        SftBox1.RowColumnHeader.Image = Img
        SftBox1.Header(1).Image = Img
    Else
        SftBox1.RowColumnHeader.Image.Clear
        SftBox1.Header(1).Image.Clear
    End If

End Sub

Private Sub ToggleImage(Img As SftPictureObject)

C#

    ItemIndex = axSftBox1.Items.Selection;
    if (ItemIndex < 0)
        return;

    // don't use images that are too large in the other areas
    Img = axSftBox1.get_Cell(ItemIndex, 0).Image;
    if (Img.ActualHeight <= 20 && Img.ActualWidth <= 20) {
        axSftBox1.RowColumnHeader.Image = Img;
        axSftBox1.get_Header(1).Image = Img;
    } else {
        axSftBox1.RowColumnHeader.Image.Clear();
        axSftBox1.get_Header(1).Image.Clear();
    }
}

private void ToggleImage(SftPictureObject Img)

C++

{
    long ItemIndex = m_vBox->Items->Selection;
    if (ItemIndex < 0) return;

    // don't use images that are too large in the other areas
    ISftPictureObjectPtr pImg = m_vBox->Cell[ItemIndex][0]->Image;
    if (pImg->ActualHeight <= 20 && pImg->ActualWidth <= 20) {
        m_vBox->RowColumnHeader->Image = pImg;
        m_vBox->Header[1]->Image = pImg;
    } else {
        m_vBox->RowColumnHeader->Image->Clear();
        m_vBox->Header[1]->Image->Clear();
    }
}

void CPicturesDlg::ExpandCollapseItem(long ItemIndex, short Shift)

See Also SftBoxHeader Object | Object Hierarchy


Last Updated 08/13/2020 - (email)
© 2024 Softel vdm, Inc.