JR-Stegano Activex

Methoden         Ereignisse
                   
Beispiel

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

            Dieses Ereignis wird beim formatieren mit ClearAllData mit jedem Fortschritt in % ausgelöst.
            wurde.
            ico_einstellungen Rückgabewert:                        

xFormat

Fortschritt in %

CancelFormat

Mit True kann der Formatiervorgang abgebrochen werden.

Beispiel:            

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

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

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

End Sub