Discussion :

[Bourak]

Salut les developpeurs

Je voudrais filtrer la liste des drives dans le composant Drivecombobox en affichant que les disques amovibles. Comment proceder?

Merci d'avance

[MedGIR]

Tu peux utiliser le pack JVCL, et le composant TJvDriveCombo avec la propriété drivetype = drivetype + [dtRemovable];



Petit exemple ici : RemovableDevice.zip

[bubulemaster]

Mieux par les api windows !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
var DriveList : DWORD ;
     iDL : Integer ;
     TypeLecteur : Integer ;
begin
    for iDL := 0 to 26 do
    begin
        TypeLecteur := GetDriveType(PChar(Chr(Ord('A') + iDL))) ;
    end ;
end ;

Pour savoir les types rendez-vous sur http://msdn2.microsoft.com/en-us/lib...39(VS.85).aspx