' ******************************************************
' 編集済みフラグ設定
' ******************************************************
Public Sub SetRowDirty(ByVal flg As Boolean)

	CType(Me.Rows(nCurrentRow), lightbox.LboxGridRow).rowDirty = flg

End Sub
Public Sub SetRowDirty(ByVal nIndex As Integer, ByVal flg As Boolean)

	CType(Me.Rows(nIndex), lightbox.LboxGridRow).rowDirty = flg

End Sub