Detectar memoria USB

[santiago14]

Empezado por kurono

yo utilizo este codigo para tales fines solo debes ajustarlo a tus necesidades

Código Delphi [-]
var
  Letra: Char;
begin
  for Letra:= 'C' to 'Z' do
    if GetDriveType(Pchar(Letra+':\')) = DRIVE_REMOVABLE then
    begin   
      ShowMessage('Esto es una memoria usb '+Letra+':\');
    end;
end;

Que mas puedo decir, este pedacito de código es una maravilla... mis felicitaciones a su creador; o por lo menos al que lo difundió por la comunidad.
Ahora conecto y desconecto mis dispositivo USB y automáticamente puedo detectar a que unidad fueron asignados... jejeje.

Saludos.

[LuisAlf::]

Empezado por santiago14

Ahora conecto y desconecto mis dispositivo USB...

Hola Santiago14...

A mi también me funcionó de maravilla el código...
Aunque me intrigaron tus palabras..heehe.. como es que puedes desconectar los dispositivos USB por medio de código..

Si sabes la respuesta me encantaria saberla..

[ecfisa]

Hola LuisAlf::

En este enlace está como activar/desactivar los puertos USB.

Saludos.

[darkmir]

var Letra: Char;
begin
for Letra:= 'C' to 'Z' do
if GetDriveType(Pchar(Letra+':\')) = DRIVE_REMOVABLE then
begin
ShowMessage('Esto es una memoria usb '+Letra+':\');
end;
end;
//

como seria en builder c++?

[ecfisa]

Hola darkmir.

Por favor cuando incluyas código en tus mensaje utiliza TAG's para darle más legibilidad:

void Show_Usb(TStrings *TS)
{
  for(char i = 'A'; i <= 'Z'; i++)
   if(GetDriveType(AnsiString((AnsiString)i + ":\\").c_str()) == DRIVE_REMOVABLE)
     TS->Add((AnsiString)i + ":\\" + "  Es una memoria USB");
}

Llamada ejemplo:

Show_Usb(ListBox1->Items);

Saludos.