JR-Stegano Activex

Methoden         Ereignisse
                    Beispiel

ReadStatus(ByVal xRead As Integer)

            Dieses Ereignis wird beim lesen von Daten mit GetText, GetData etc. mit jedem Fortschritt in % ausgelöst.
            wurde.
             ico_einstellungen Rückgabewert:                        

xRead

Fortschritt in %

Beispiel:

            Private Sub JRStegano1_ReadStatus(xRead As Integer)

                        Command2.Caption = Str$(xRead) + "%"

                        If xRead = 100 Then Command2.Caption = "Lesen"

            End Sub