Ver Mensaje Individual
  #2  
Antiguo 29-10-2007
Avatar de ixMike
ixMike ixMike is offline
Miembro
 
Registrado: feb 2004
Posts: 1.151
Reputación: 22
ixMike Va por buen camino
Código Delphi [-]

Function UnidadLista(Unidad: Char): Boolean;
begin
Result:=FileExists(Unidad+':\NUL');
end;

Basado en esto:

http://www.q3.nu/trucomania/truco.cgi?62&esp

Saludos
Responder Con Cita