Bonjour,

J'ai l'arborescence suivante : (noms fictifs pour cette présentation !)
C:\Program Files\Dossier_A\ et le dossier_A contient lui-même 2 dossiers : Dossier_B et Dossier_C.

J'espère être clair pour tous !

Je place sur ma forme un bouton Btn1 et un OpenDialog1.

Le code est le suivant :

procedure TForm1.Btn1Click(Sender: TObject);
begin
OpenDialog1.InitialDir := 'C:\Program Files\Dossier_A\';
if OpenDialog1.Execute then
begin
...
etc.

OpenDialog1 s'ouvre prépositionné sur Dossier_A, jusque là, tout est normal.
je choisis son sous-dossier Dossier_B puis un fichier de ce sous-dossier. OpenDialog1 se referme.
Tout est normal.

A un autre moment du déroulement de mon programme, je re-sollicite Btn1.

Et là, OpenDialog1 s'ouvre prépositionné sur Dossier_B (le dernier appelé) alors que dans ma procédure commence toujours par :

OpenDialog1.InitialDir := 'C:\Program Files\Dossier_A\'; (voir plus haut)

Il me semble que OpenDialog1 n'en tient pas compte et se repositionne sur le dernier dossier appelé !

Je souhaite qu'à chaque appel par le bouton Btn1, OpenDialog1 s'ouvre sur le dossier Dossier_A.

Comment le forcer à obéir à la commande InitialDir programmée ?

Merci de m'avoir lu. A vous lire...

Amitiés.

Pierre. (ps : je suis en Delphi 7 Entreprise)