JR-Stegano Activex

Properties   Methods   Events   Example

FormatStatus(ByVal xFormat As Integer, ByVal CancelFormat As Boolean)

            Formating the picture with ClearAllData will fire this event with each progress in %.

            ico_einstellungen Return value:                        

xFormat

Progress in %

CancelFormat

With True the formatting process can be aborted.

Example:            

Private Sub JRStegano1_FormatStatus(xFormat As Integer, CancelFormat As Boolean)

            Command12.Caption = Str$(xFormat) + "%"

            If xFormat = 100 Then Command12.Caption = "formatting"

End Sub

.