Autore Topic: Aprire cartella e selezionare file  (Letto 1541 volte)

Offline Ceskho

  • Amministratore
  • Senatore Gambero
  • *****
  • Post: 3.778
  • Vi Veri Veniversum Vivus Vici
    • Mostra profilo
    • Pagina Personale
Aprire cartella e selezionare file
« il: 12 Ottobre 2008, 06:08:31 »
ho dato il seguente comando:

PUBLIC SUB Button3_Click()

Codice: [Seleziona]
DIM FileIcona AS file

  Dialog.Path = Application.Path
  IF Dialog.OpenFile() THEN RETURN
  OPEN (Dialog.Path) FOR READ AS #FileIcona

END


mi si apre la finestra che contiene delle icone. Ora come faccio a salvare in una textbox l'indirizzo dell'icona su cui faccio il doppio click così da poterla poi successivamente abbinare ad una picturebox?

Offline md9327

  • Moderatore
  • Senatore Gambero
  • *****
  • Post: 2.840
    • Mostra profilo
Re: Aprire cartella e selezionare file
« Risposta #1 il: 12 Ottobre 2008, 12:16:42 »
Il metodo static Dialog.OpenFile() ti permette di attivare il sistema Multi, ovvero di selezionare più file, che ti vengono poi restituiti in un'array string.

Codice: [Seleziona]

DIM ListaFile AS String[]
DIM NomeFile AS String

  Dialog.Path = Application.Path
  IF Dialog.OpenFile( TRUE ) THEN RETURN
  ListaFile = Dialog.Path
  FOR EACH NomeFile IN ListaFile
    PRINT NomeFile
  NEXT

END

Offline Ceskho

  • Amministratore
  • Senatore Gambero
  • *****
  • Post: 3.778
  • Vi Veri Veniversum Vivus Vici
    • Mostra profilo
    • Pagina Personale
Re: Aprire cartella e selezionare file
« Risposta #2 il: 12 Ottobre 2008, 16:24:19 »
A me però serve una sola icona. Ne devo selezionare una facendo doppio click....un array è inutile per il mio scopo...

Offline ccc

  • Gambero
  • **
  • Post: 97
    • Mostra profilo
    • http://santecaserio.altervista.org/
Re: Aprire cartella e selezionare file
« Risposta #3 il: 12 Ottobre 2008, 18:07:52 »
E' uguale: dentro Dialog.Path ci va l'array di stringhe se permetti di selezionarne più d'una, oppure ci va una stringa sola se permetti di selezionarne una sola.

Codice: [Seleziona]
PUBLIC SUB btnReadChoose_Click()
 
  Dialog.Title = "Leggi un file"
  Dialog.Path = lastInFile
  Dialog.OpenFile(FALSE)
  txtRead.Text = Dialog.Path
  inFile = Dialog.Path
 
END

Offline giulio

  • Maestro Gambero
  • ****
  • Post: 280
    • Mostra profilo
Re: Aprire cartella e selezionare file
« Risposta #4 il: 12 Ottobre 2008, 19:29:15 »
Se ti serve l'indirizzo dell'icona è inutile dichiararla come file.

Codice: [Seleziona]


DIM FileIcona AS String

  Dialog.Path = Application.Path
   
  IF Dialog.OpenFile() THEN RETURN  
  TextBox1.Text = Dialog.Path



ciao

Offline md9327

  • Moderatore
  • Senatore Gambero
  • *****
  • Post: 2.840
    • Mostra profilo
Re: Aprire cartella e selezionare file
« Risposta #5 il: 13 Ottobre 2008, 13:21:23 »
Se devi fare una selezione visibile in modo interattivo, allora devi costruire un'apposita finestra dove su un lato presenti la lista delle icone nel filesystem, sulla destra quelle che selezioni con il doppio click.
Al termine avrai comunque un elenco di nomi di file (path comprese) che dovranno servirti nel programma...

Offline Ceskho

  • Amministratore
  • Senatore Gambero
  • *****
  • Post: 3.778
  • Vi Veri Veniversum Vivus Vici
    • Mostra profilo
    • Pagina Personale
Re: Aprire cartella e selezionare file
« Risposta #6 il: 18 Ottobre 2008, 16:02:27 »
Ringrazio Giulio....il suo codice era ciò che desideravo

Offline Ceskho

  • Amministratore
  • Senatore Gambero
  • *****
  • Post: 3.778
  • Vi Veri Veniversum Vivus Vici
    • Mostra profilo
    • Pagina Personale
Re: Aprire cartella e selezionare file
« Risposta #7 il: 29 Gennaio 2009, 19:08:06 »
Continuo qui....
Mi servirebbe estrarre solo il nome del file che seleziono. Cioè se seleziono "Esempio.txt" nella cartella home, nella textbox deve apparire solo il nome e non tutto il percorso del file...come faccio?

Offline md9327

  • Moderatore
  • Senatore Gambero
  • *****
  • Post: 2.840
    • Mostra profilo
Re: Aprire cartella e selezionare file
« Risposta #8 il: 29 Gennaio 2009, 20:00:47 »
Uno dei metodi della classe statica "File" !!!

Non ti dico quale...  :-P

Offline Ceskho

  • Amministratore
  • Senatore Gambero
  • *****
  • Post: 3.778
  • Vi Veri Veniversum Vivus Vici
    • Mostra profilo
    • Pagina Personale
Re: Aprire cartella e selezionare file
« Risposta #9 il: 29 Gennaio 2009, 20:08:28 »
e per avere solo l'ultima cartella di un percorso?

Offline leo72

  • Amministratore
  • Senatore Gambero
  • *****
  • Post: 2.163
    • Mostra profilo
    • http://www.leonardomiliani.com
Re: Aprire cartella e selezionare file
« Risposta #10 il: 29 Gennaio 2009, 23:54:51 »
Solo l'ultima?
Cioè intendi che se un percorso è ad esempio /home/leo/file vorresti avere /home/leo? File.Dir().
Ho capito bene? Oppure vorresti solo /leo? In questo caso credo tu debba scrivere un piccolo algoritmo.
Visita il mio sito personale: http://www.leonardomiliani.com

Offline Ceskho

  • Amministratore
  • Senatore Gambero
  • *****
  • Post: 3.778
  • Vi Veri Veniversum Vivus Vici
    • Mostra profilo
    • Pagina Personale
Re: Aprire cartella e selezionare file
« Risposta #11 il: 30 Gennaio 2009, 00:37:50 »
No penso che quello che hai scritto debba andar bene.