Italian community of Lazarus and Free Pascal

Programmazione => Generale => Topic aperto da: bonmario - Novembre 15, 2020, 08:51:13 am

Titolo: Smontare chiavetta USB su Windows 64 bit
Inserito da: bonmario - Novembre 15, 2020, 08:51:13 am

Ciao a tutti,
anni fa avevo trovato questa discussione, in cui c'era il codice che mi permetteva di smontare una chiavetta USB su Windows.

http://forum.lazarus.freepascal.org/index.php/topic,34168.15.html

Se lo compilo con FPC 32 bit, funziona. Se però lo compilo con FPC 64 bit, non da errori in compilazione, e nemmeno in esecuzione, ma non smonta la chiavetta.
Avete qualcosa che già funziona, o sapete dirmi come sistemare questo?

Grazie in anticipo, Mario

Titolo: Re:Smontare chiavetta USB su Windows 64 bit
Inserito da: xinyiman - Novembre 15, 2020, 04:58:20 pm

Mi dispiace, io non ho mai fatto nulla del genere.

Titolo: Re:Smontare chiavetta USB su Windows 64 bit
Inserito da: bonmario - Novembre 16, 2020, 10:21:12 am

Casomai servisse a qualcuno in futuro, ho trovato un modo per aggirare il problema ...

Al comando qui sotto, basta sostituire il carattere "@" con la lettera maiuscola del drive in cui è inserita la chiavetta, e poi lanciarlo:

Codice: [Seleziona]

powershell (New-Object -comObject Shell.Application).Namespace(17).ParseName(\"@:\").InvokeVerb(\"Eject\")

Ciao, Mario

Titolo: Re:Smontare chiavetta USB su Windows 64 bit
Inserito da: xinyiman - Novembre 16, 2020, 07:28:13 pm

Ottimo grazie