WinStudio
IWSIDOCollection interface
Returns a Boolean value indicating whether an object in a specified IDO collection is the automatically inserted row (the autoinsert row) and has been unmodified.
object.IsObjectAutoInsertedAndUnmodified( integer )
Part |
Description |
object | Required. The name of a valid IDO collection object. |
integer | Required. The index number of an object in the entries for the current IDO collection. |
A return value of:
If the specified IDO collection might not have the focus, use this method. If the specified IDO collection has the focus, use the IsCurrentObjectAutoInsertedAndUnmodified method.
Sub main() Dim oSubCol As IWSIDOCollection oSubCol = ThisForm.Components("SerialGrid").IDOCollection If oSubCol.NewEnabled = False Then Dim i As Integer i = oSubCol.GetCurrentObjectIndex If oSubCol.IsObjectAutoInsertedAndUnmodified(i) = True Then oSubCol.SetObjectPropertyPlusModifyRefresh("UbSelect", i, "0") End If End If End Sub