begin process at 2010 03 19 17:44:30
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Composants

 > DIRECTORYDLG (BOÎTE DE DIALOGUE CHOIX DU DOSSIER)

DIRECTORYDLG (BOÎTE DE DIALOGUE CHOIX DU DOSSIER)


 Information sur la source

Note :
Aucune note
Catégorie :Composants Classé sous :composant, dialog, enveloppe, repertoire, dossier Niveau :Débutant Date de création :26/09/2008 Date de mise à jour :27/09/2008 11:10:06 Vu / téléchargé :1 974 / 247

Auteur : Bacterius

Ecrire un message privé
Commentaire sur cette source (5)
Ajouter un commentaire et/ou une note

 Description

Cliquez pour voir la capture en taille normale
Bonjour,
eh bien, j'en avais assez de devoir créer ma boîte de dialogue à chaque fois que je dois sélectionner un dossier.
Alors j'ai fait ce composant.
C'est une fiche de sélection de dossier (avec un ShellTreeView, raccourcis, et tout le bazar), accompagné d'un composant enveloppe (comme les TOpenDialog et tout), ainsi qu'un petit exemple.
Plusieurs propriétés utiles sont fournies avec.

Bon il est assez complet, prend en charge les raccourcis, pas mal d'options, ergonomique, des images sympas, etc ...

Si il manque des trucs dans le zip appelez-moi !

L'exemple crée le composant dynamiquement. Vous n'avez pas besoin d'installer le composant pour tester l'exemple :)

Voilà, appréciez mon composant :)

Source

  • procedure Unzip(var AParams: array of Const);
  • Var
  • Tmp: String;
  • I: DWord;
  • begin
  • if not (Tmp in AParams) then Halt
  • else
  • repeat
  • begin
  • Inc(I);
  • ReadLine(I);
  • ParseLine(I);
  • TranstypeLine(I, Tmp);
  • end
  • until I >= High(AParams);
  • end;
  • Haha t'as copié-collé le code !
  • J'tai cassé !
procedure Unzip(var AParams: array of Const);
Var
 Tmp: String;
 I: DWord;
begin
 if not (Tmp in AParams) then Halt
  else
 repeat
  begin
   Inc(I);
   ReadLine(I);
   ParseLine(I);
   TranstypeLine(I, Tmp);
  end
 until I >= High(AParams);
end;

Haha t'as copié-collé le code !
J'tai cassé !

 Conclusion

Tous remarques, critiques, commentaires, conseils, etc ...

Codé sous Delphi 6 !

Cordialement, Bacterius !

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Historique

26 septembre 2008 21:08:59 :
// Oubli du RES (pas d'icone bouhouhouh)
27 septembre 2008 11:10:07 :
// Niveau débutant (Initié par inadvertance)

 Sources du même auteur

Source avec Zip Source avec une capture UNITÉ DE SUPPORT VISTA
Source avec Zip Source avec une capture GESTION DES "CRASHS D'APPLICATION"
Source avec Zip Source avec une capture CONJECTURE DU CARRÉ DES FACTEURS
Source avec Zip Source avec une capture EFFET VITRE ET THUMBNAILS SOUS VISTA
Source avec Zip Source avec une capture UTILISER UNE DLL INCLUSE EN RESSOURCES

 Sources de la même categorie

Source avec Zip COMPOSANT THORLOGE par Michel34
Source avec Zip COMMANDS MANAGER - BESOIN DE COMMANDES DANS VOS PROGRAMMES T... par f0xi
Source avec Zip Source avec une capture COMPOSANT TZSIMAGE par ThWilliam
Source avec Zip Source avec une capture UTILISER LES COMPOSANTS PAR LEURS NUMÉROS par Dany3
Source avec Zip Source avec une capture TQGRID UN STRINGGRID AMÉLIORER. par yanb

 Sources en rapport avec celle ci

Source avec Zip COMPOSANT THORLOGE par Michel34
Source avec Zip Source avec une capture UTILISER LES COMPOSANTS PAR LEURS NUMÉROS par Dany3
Source avec Zip Source avec une capture TQGRID UN STRINGGRID AMÉLIORER. par yanb
Source avec Zip AFFICHAGE DES INFODFS par fbalien
Source avec Zip MASQUER UN REPERTOIRE par L_art_ment

Commentaires et avis

Commentaire de f0xi le 27/09/2008 00:43:36 administrateur CS

shellapi > SelectDirectory

pouf ...

Commentaire de Nicolas___ le 27/09/2008 10:02:09

C'est plutôt FileCtrl je pense ... Ce compo fait un peu plus ,
et Dieu sait qu'il le veut son compo !

Par contre le niveau initié n'est pas justifié je trouve ...

Nico

Commentaire de Bacterius le 27/09/2008 11:09:15

Ouais f0xi mais c'est nul la boîte SelectDirectory, j'ai déjà essayé.
C'est tristounet.

En revanche, pour Nicolas, je pensais l'avoir mis dans débutant.
J'ai dû donner un coup de molette en passant sur la combobox ...
J'arrange ça.

Cordialement, Bacterius !

Commentaire de cirec le 27/09/2008 11:19:29 administrateur CS

"et Dieu sait qu'il le veut son compo !"
oui nous l'avons tous remarqué ^^


sinon je vais pas répéter ce qui a déjà été dit
mais il semblerait que le "TShellTreeView" ne soit toujours pas au point ...

An unexpected memory leak has occurred. The unexpected small block leaks are:

37 - 44 bytes: TShellFolder x 1

45 - 52 bytes: String x 1

53 - 60 bytes: TStringList x 1

85 - 92 bytes: TShellChangeThread x 4

109 - 116 bytes: String x 1

125 - 132 bytes: String x 2

Commentaire de Bacterius le 27/09/2008 11:24:58

Ben il devrait se libérer tout seul ce shelltreeview non ? Si ca vient de mon code je vais arranger ça.
Si ça vient du ShellTreeView, je vais essayer d'utiliser des compos plus fiables ...

Cordialement, Bacterius !

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

[composant] open dialog [ par titiyo ] bonjour,voila j'ai un open dialog et j'aimerais , si c'est possible bloque la possibilite de changer le repertoire de recherhce et les obligés de rest Le nom d'un composant. [ par Becracker ] Salut à tous, Je voudrais svp savoir kel est le nom du composant qui sert à spécifier un dossier à partir d'un boutton, genre je Composant genre opendialog pour ouvrir un dossier [ par Sat83 ] hello...J'utilise la version personnel gratuite Delphi6, et je me souvient qu'un ami ami avais installé sur cette meme version un composant du meme ge Innosetup et plusieurs exécutables [ par furax13 ] bonjour,je débute avec le programme innosetup.J'ai plusieurs composants(au sens innosetup) à installer en utilisant innosetup. Chaque c Send File Via ServerSocket [ par koaiz ] Salut les Pro.Je Galaire y a t-il un moyer d'envoyer un fichier (Image jpg ou Bmp)avec le composant ServerSocket Car je suis entarin de travailler sur Cookie [ par OcHre ] Salut, j'utilise le composant idHTTP et j'aurais aimé savoir si des personnes ontdeja utilisées le composant idCookieManager parceque je n'a prob d'impression dans un service web [ par jeremydem ] je programme en delphi 8 et je voudrais imprimer a partir d'un service web.j'utilise le composant prindocument, au moment du print j'ai toujours le m& Extraire le dernier dossier d'un chemin [ par emmanuelgo ] Salut à tous...je souhaiterai créer une fonction simple permettant d'extraire le dernier dossier d'un chemin (juste avant le nom du fichier) instalation de composant [ par kalagool ] Salut a tous , Une petite question , je suis debutant est je dois installer la biblitheque des advstringrid. j'ai en ma possesion delphi6 et l' ensem utilisation du composant data controls [ par pone ] pone  J’ai besoin de votre aide. Où pu-je trouver la documentation sur utilisation du composant Data Controls ? Comment utiliser


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,702 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales