Discussion :

[dridri86]

Bonjour

Existe-t-il une fonction qui me permettrait de pouvoir récupérer la lettre de l'unité (logique ou disque dur peu importe) sur laquelle est installé mon programme?

D'avance merci

[Cl@udius]

Salut

Ainsi:

Code :

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

1
2
 
  Lecteur := ExtractFileDrive(ParamStr(0));

Voilou !

@+ Claudius

[Clorish]

Ou :

Code :

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

1
2
 
Drive := ExtractFileDir(Application.ExeName)[1]

[Cl@udius]

Oui, on peut faire aussi:

Code :

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

1
2
 
  Lecteur := ParamStr(0)[1];

A noter que ceci ramène 'C' et que:

Code :

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

1
2
 
  Lecteur := ExtractFileDrive(ParamStr(0));

ramène 'C:'

A voir selon les besoins.

@+

[dridri86]

Merci Cl@udius et Clorish pour votre précieuse aide.

J'ai utilisé la méthode de Cl@udius et cela marche parfaitement pour ce que j'avais à faire.

Encore merci