saber si una unidad de disco es una memoria flash o memory stick

[compaqdavid]

quisiara incluir en un proyecto que tengo la posibilidad de saber si una de las unidades de disco es una memoria flash o sea saber si hay una memoria conectada al usb y cual es o sea si es [d] [e] o [f] etc. agradesco de antemano su atencion.:p :p :confused:

[seoane]

Como ya te comente en otro hilo las memorias usb, al menos la mayoría, están marcadas como "removibles". Así que para encontrarla podemos hacer algo como esto:


var
Letra: Char;
begin
for Letra:= 'C' to 'Z' do
if GetDriveType(Pchar(Letra+':\')) = DRIVE_REMOVABLE then
begin
// Aqui usamos la letra para lo que queramos
ShowMessage('Esto es una memoria usb '+Letra+':\');
end;
end;


Aunque también seria interesante detectar cuando se conecta o desconecta una memoria. Esto lo hacemos de forma similar a como lo haríamos con un cdrom, además el propio evento ya nos informaría de la letra de la unidad.

El compañero roman explica como hacer esto en su pagina:
http://romansg.net/index.php?pg=cdchange

Y aquí hilo en el que hablamos sobre el tema:
http://www.clubdelphi.com/foros/showthread.php?t=31486