SftTree/DLL 7.5 - Tree Control
SftBox/OCX 5.0 - Combo Box Control
SftButton/OCX 3.0 - Button Control
SftMask/OCX 7.0 - Masked Edit Control
SftTabs/OCX 6.5 - Tab Control (VB6 only)
SftTree/OCX 7.5 - Tree Control
SftPrintPreview/DLL 2.0 - Print Preview Control (discontinued)
SftTree/DLL 7.5 - Tree Control
SftBox/OCX 5.0 - Combo Box Control
SftButton/OCX 3.0 - Button Control
SftDirectory 3.5 - File/Folder Control (discontinued)
SftMask/OCX 7.0 - Masked Edit Control
SftOptions 1.0 - Registry/INI Control (discontinued)
SftPrintPreview/OCX 1.0 - Print Preview Control (discontinued)
SftTabs/OCX 6.5 - Tab Control (VB6 only)
SftTree/OCX 7.5 - Tree Control
SftTabs/NET 6.0 - Tab Control (discontinued)
SftTree/NET 2.0 - Tree Control
Returns the actual height of the image.
Get
VB.NET | HPix = object.ActualHeight As Integer |
VB | HPix = object.ActualHeight As Long |
C#.NET | int HPix = object.ActualHeight; |
VC++ | long HPix = object->ActualHeight; long HPix = object->GetActualHeight(); |
C | HRESULT object->get_ActualHeight(long* HPix); |
object
HPix
Returns the actual height of the image.
The ActualHeight property returns the actual height of the image.
The SftPictureObject.Height property returns the desired image height, last defined by the application. The desired height is only used for certain image types (see SftPictureObject.Type).
Dim ItemIndex As Integer
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
Dim ItemIndex As Integer
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
SftPictureObject Img;
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();
}
}
CopyImageFromCurrentItem();
return TRUE; // return TRUE unless you set the focus to a control
}
void CPicturesDlg::PropagateImage(long ItemIndex, ISftPictureObjectPtr Img)
{
// don't use images that are too large in the other areas
if (Img->ActualHeight <= 20 && Img->ActualWidth < 20) {
m_vBox->Item[ItemIndex]->Image = Img;
m_vBox->Item[ItemIndex]->LabelImage = Img;
m_vBox->Item[ItemIndex]->RowHeader->Image = Img;
}
}
void CPicturesDlg::UpdateBitmap(long ItemIndex, const CBitmap& bmp, SftBoxHAlignConstants Align)
See Also SftPictureObject Object | Object Hierarchy