Le nom d'un composant.

Question

Salut &#224; tous,



Je voudrais svp savoir kel est le nom du composant qui sert &#224; sp&#233;cifier
un dossier &#224; partir d'un boutton, genre je clique sur le boutton, la
boite de dialogue s'ouvre puis je  sp&#233;cifie le dossier dont je
r&#233;cup&#232;re le chemin dans un edit.


-----------------------------------------

May Delphi and Php change the world ....

jlen100 · Answer

salut 

c'est opendialog et tu r&#233;cut&#232;rfe la chemin dans filename

jlen100 · Answer

tu le trouveras dans la barre d'outil &#224; dialogues.

tu places un opendialog et  un bouton sur ta form et dans l'&#233;venement onclick 

procedure TForm1.Button1Click(Sender: TObject);

begin

opendialog1.Execute;

end;

bonne prog

Becracker · Answer

m&#233; OpenDialog sert seulement &#224; s&#233;lectionner un fichier, moi je veux sp&#233;cifier un dossier.

-----------------------------------------

May Delphi and Php change the world ....

jlen100 · Answer

salut utlises: shelltreeview1 et tu r&#233;cur&#232;res le r&#233;pretoire dans shelltreeview1.Path;;

Becracker · Answer

et Je le trouve dans kel cat&#233;gorie de composants dans Delphi ?

-----------------------------------------

May Delphi and Php change the world ....

florenth · Answer

Rajoute "FileCtrl" dans les uses et utilise le bout de code suivant :

var Rept: string; begin if not SelectDirectory('Selectionnez un répertoire','',Rept) then Exit; { Utilisation du répertoire contenu dans Rept. }¨ ... end;

@ ++ Florent Si tu ne te plantes pas ...... tu ne poussera jamais

florenth · Answer

D&#233;sol&#233; Sat, &#224; une minute pr&#232;s, nos messages se sont crois&#233;s. 

Bonne nuit :-)

jlen100 · Answer

tu trouve Tshelltreeview dans  la barre d'outil &#224; exemples

Becracker · Answer

Sat83 et Florenth, je veux que ce soit l'utilisateur qui choisisse le
dossier. Dans votre code, je ne vois pas commment celui ci pourra
choisir le dossier, je dois utiliser une opendialog ou koi ?

Pour Jeln100, je ne le trouve pas dans la barre d'outils Samples.



Merci encore &#224; tous.

-----------------------------------------

May Delphi and Php change the world ....

Becracker · Answer

Ok c bon les gars, ca marche !! D&#233;sol&#233; pour le double post. 

-----------------------------------------

May Delphi and Php change the world ....

Becracker · Answer

Je voudrais juste savoir comment faire pour donner une apparence Xp &#224; la boite de dialogue qui souvre.

-----------------------------------------

May Delphi and Php change the world ....

jlen100 · Answer

quelle version as-tu?

florenth · Answer

ça marche, on le sait très bien. Mais tu pourrais valider les réponses justes car là ,on n'est pas capable de savoir laquelle est juste. Sinon, concernant le code de Sat et moi-même, je te confirme qu'il n'y a pas besoin de composant. tu mets cela dans le OnClick d'un bouton et ça marche.

uses [ ... ], FileCtrl; procedure TForm1.ButtonClick(Sender: TObject); var Rept: string; begin if not SelectDirectory('Selectionnez un répertoire','',Rept) then Exit; { Utilisation du répertoire contenu dans Rept. } ... end;

Ce bout de code fait apparaitre une boite de selection de répertoire et renvoie le nom du rept selectionné par l'utilisateur dans la variable Rept. @ +++ Florent Si tu ne te plantes pas ...... tu ne poussera jamais

Le nom d'un composant.

13 réponses

Votre réponse

Discussions similaires