Hide

SftBox/OCX 5.0 - Combo Box Control

Display
Print

SftBoxRowColumnHeader.Image Property

Defines the graphic displayed in the row/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 SftBoxRowColumnHeader object.

refImageObj

Defines the graphic displayed in the row/column header.

Comments

The Image property defines the graphic displayed in the row/column header.

The dimensions of the graphics are used to calculate the minimum required height for all column headers and the row/column header, so graphics and text are never clipped vertically.

To remove the row/column 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 RowColumnHeader.ImageHAlign and RowColumnHeader.ImageVAlign properties.

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).

Examples

VB.NET

    Dim Img As SftPictureObject

    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

VB6

    Dim Img As SftPictureObject

    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

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++

void CPicturesDlg::CopyImageFromCurrentItem()
{
    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();
    }
}

See Also SftBoxRowColumnHeader Object | Object Hierarchy


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