Sorry to interrupt
This code was fine, but crashed after the addition of the SdCalendarDialog control.
Error location: V.tag
This code was fine, but crashed after the addition of the SdCalendarDialog control.
Error location: V.tag
B4X:
Dim no_list,weight_list As List
no_list.Initialize
weight_list.Initialize
Try
For Each v As View In Activity.GetAllViewsRecursive
Select v.Tag
Case "P"
no_list.Add(v)
Case "Weight"
weight_list.Add(v)
End Select
Next
For i = 0 To 99
SQL_NO(i)=no_list.Get(i)
SQL_WEIGHT(i)=weight_list.Get(i)
Next
Catch
ToastMessageShow("Scan fail",True)
But_Close_Click 'close
End Try