JR-Stegano Activex

Properties   Methods   Events   Example

ReadStatus(ByVal xRead As Integer)

            this event is fired at read data with GET text, GET DATA a.s.o
            with each progress in % became.

            ico_einstellungen Return value:                        


Progress in %


            Private Sub JRStegano1_ReadStatus(xRead As Integer)

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

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

            End Sub

Return value: