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 / Exemple :
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 !
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.