Hi,
I start the ProgressDialogShow in a SUB, and run the ProgressDialogHide in another SUB.
The problem is that this ProgressDialogShow disappears before run the ProgressDialogHide.
I have this code
This is not the unique code where I have problem.. it's only one of
The process start in SELECT_update and ends in SELECT_complete but the ProgressDialogShow disappears suddenly
What's wrong ?
I start the ProgressDialogShow in a SUB, and run the ProgressDialogHide in another SUB.
The problem is that this ProgressDialogShow disappears before run the ProgressDialogHide.
I have this code
B4X:
Sub SELECT_update(r As Map)
Dim Campos(r.Size) As String, i As Int
Registros=Registros+1
ProgressDialogShow(Registros & " rows processed")
If PrimerRegistro=1 Then
Dim Cabeceras(r.Size) As String
PrimerRegistro=0
g.Initialize(Me,"g")
g.InitializeTable(r.size,0,False)
g.AddToActivity(Activity , 0, 50dip, 100%x, 80%y)
For i = 0 To r.Size-1
Cabeceras(i)=r.GetKeyAt(i)
Next
g.SetHeader(Cabeceras)
End If
For i = 0 To r.Size-1
Campos(i)=r.GetValueAt(i)
Next
G.AddRowAutomaticWidth(Campos)
End Sub
Sub SELECT_complete(Status As Boolean)
ProgressDialogHide
lblCantRegistros.Text=Registros & " Rows "
End Sub
Sub SELECT_error(ErrDesc As String)
Msgbox("Error : " & ErrDesc,"Error")
End SubThis is not the unique code where I have problem.. it's only one of
The process start in SELECT_update and ends in SELECT_complete but the ProgressDialogShow disappears suddenly
What's wrong ?