If InvTable.IsInitialized = False Then
InvTable.Initialize(Me,"InvTable",7,0,False)
InvTable.AddToActivity(Activity,10,140,90%x,70%y)
Dim Alignments() As Int
Alignments=Array As Int(Gravity.LEFT,Gravity.LEFT,Gravity.LEFT,Gravity.LEFT,Gravity.RIGHT,Gravity.RIGHT,Gravity.RIGHT)
InvTable.SetCellAlignments (Alignments)
Else
InvTable.ClearAll
End If
DoEvents
InvTable.LoadTableFromCSV(File.DirRootExternal,DownloadFileName,True)
InvTable.SetColumnsWidths(Array As Int(50dip,90dip,340dip,340dip,80dip,70dip,90%x -970))