[Gambas-user] Size Multiple Files with FileProperties

[herberth guzman]

Salut Benoit

Benoit consultation.

If I want to get the size of a file with FileProperties the code is:
FileProperties1.Path=User.Home &/ "test.png"

But I need to get the size of several Selected Files in a FileView.
Is this possible.?


I tried with the following code:
But it is not possible.


Public Sub Form_Open()

  FileViewDesktop.Dir = Desktop.GetDirectory("DESKTOP") '
  FileViewDesktop.Mode = 2

End

Public Sub FileViewDesktop_Select()

  Dim strFiles As String[]
  Dim strData As String
  Dim strFile As String
  Dim sDir As String

  strFiles = FileViewDesktop.Selection
  If strFiles.Count > 0 Then
    For Each strFile In strFiles
      strFile = FileViewDesktop.Dir &/ strFile
      strData = strData & strFile ' & "\n"
      Print sDir &/ strData
     FileProperties1.Path = sDir & strData
     ' FileProperties1.Path=User.Home &/ "test.png"
    Next
     strFiles.Clear()
     strFiles = Null

  Endif

End


I need help please.

Herberth Guzmán