Gambas-it

Archivi (sola lettura) => Programmazione (Gambas 2) => Topic aperto da: andy60 - 03 Novembre 2010, 19:39:55

Titolo: [Risolto] Caricamento delle immagini e path
Inserito da: andy60 - 03 Novembre 2010, 19:39:55

Ho la seguente routine che mi carica le immagini:

Codice: [Seleziona]

PUBLIC SUB btFOTO_Click()
  Dialog.Title = "Scegli immagine"
  Dialog.Filter = ["*.png;*.jpg;*.jpeg;*.bmp", "Picture files"]
  Dialog.Path = mLibs.CartellaDiLavoro &/ "images/palestra/"
  IF Dialog.OpenFile() THEN 
    RETURN
  END IF
  PictureBox1.picture = picture.load(Dialog.path)
  txtIMMAGINE.Text = Dialog.path '<= mi evidenzia tutto, path e nome dell'immagine
END

Volendo solo memorizzare il nome dell'immagine, escludendo il path (motivo: utilizzo del programma da parte di tutti gli utenti, avendo il path una gestione a parte), come posso fare? In Dialog.path trovo tutto, anche il path. Grazie x l'attenzione :rolleyes:

Devo scrivere una funzione che mi tagli la stringa in corrispondenza dell'ultimo slash di destra?

Titolo: Re: Caricamento delle immagini e path
Inserito da: leo72 - 03 Novembre 2010, 19:46:58

Credo tu debba filtrare il risultato della dialog con File.
La guida online ha un esempio chiarificatore:
http://gambasdoc.org/help/comp/gb/file

Titolo: Re: Caricamento delle immagini e path
Inserito da: andy60 - 03 Novembre 2010, 19:52:53

grazie Leo, mi era sfuggita

soluzione:

Codice: [Seleziona]

txtIMMAGINE.Text = File.Name(Dialog.Path) 

Titolo: Re: Caricamento delle immagini e path
Inserito da: Ceskho - 04 Novembre 2010, 01:55:13

Citazione da: andy60 - 03 Novembre 2010, 19:52:53

grazie Leo, mi era sfuggita

soluzione:

Codice: [Seleziona]

txtIMMAGINE.Text = File.Name(Dialog.Path) 

o anche

Codice: [Seleziona]

txtIMMAGINE.Text = File.BaseName(Dialog.Path) 

Se vuoi il nome senza estensione.