Individuare la cartella principale dei file sorgenti di Gambas contenente la sub-cartella di un file immagine

In via generale il nome della cartella principale, contenente le altre sub-cartelle contenenti a loro volta altre sub-cartelle dei file sorgenti di Gambas, è "gambasdevel". BR>Tale nome però pu essere anche cambiato in prima fase di installazione dei sorgenti di Gambas.

Per individuare con certezza - ad esempio - un file immagine, presente in una sub-cartella dei sorgenti di Gambas, è necessario sapere il nome della cartella principale dei sorgenti di Gambas.

Potremo procedere come segue:

Private Const PERCORSOIMMAGINE As String = "comp/src/gb.form.stock/gambas/128/music.png"


Public Sub Form_Open()

 Dim ss As String[] = ["Documenti"]
 Dim s As String
 Dim b As Byte

 Repeat 
   s = Dir(User.Home, "*", gb.Directory)[b]
   If Exist(User.Home &/ s &/ "/comp") Then 
     With PictureBox1
       .Image = Image.Load(User.Home &/ s &/ PERCORSOIMMAGINE)
       .Resize(.Image.W, .Image.H)
     End With
   Endif
   Inc b
 Until b == Dir(User.Home, "*", gb.Directory).Max

End