begin process at 2008 07 05 18:28:01
1 205 296 membres
267 nouveaux aujourd'hui
14 119 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

DÉTECTION ET COMPRESSION DU CONTENU D'UN FLASH-DISK USB


Information sur la source

Catégorie :API Classé sous : usb, flash, compression, zlib, rechercher Niveau : Expert Date de création : 03/12/2006 Vu / téléchargé: 8 993 / 1 595

Note :
Aucune note

Commentaire sur cette source (12)
Ajouter un commentaire et/ou une note

Description

Ce code permet de detecter la conexion d'un  Flash-disk USB et lister touts les fichiers existants a l'interieur
ensuite compresser ces fichiers dans 1 seul fichier (ZLIB compression)
Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

  • signaler à un administrateur
    Commentaire de Matt 261 le 03/12/2006 19:07:05

    Salut,

    je ne pourrais pas regarder ta source parceque je n'ai plus Delphi mais tous les fichiers en "~." ne sont pas utiles.
    Le point que tu pourrais developper, c'est faire une sorte d'autorun sur clé USB (je voulais faire un prog sur ça mais je ne peux plus :(.

    @+
    Matt

  • signaler à un administrateur
    Commentaire de cirec le 03/12/2006 20:10:08 administrateur CS

    Salut,

    Matt a raison ...
    seulement 3 fichiers sur 11 présents dans ton Zip sont absolument nécessaire.

    Le niveau de la source est largement sur estimé (Niveau Débutant me parait plus juste)

    Vu que c'est une copie de deux autre sources disponible ici sur DelphiFr tu pourrais au moins donner les liens correspondant et les auteurs (Merci pour eux).

    Le code maintenant : dans le code c'est un peut le bordel ...
    le {$R *.dfm} se retrouve en plein milieu du code ???
    dans les procédure tu sautes des fois plusieurs lignes ???

    au lieu de faire des addition interminable du genre :
    S := S + 'Disponible :' +#9+#9+ FloatToStrF(DiskFree(strtoint(GetLettre)-64) div 1024, ffNumber, 18, 0) + ' Kilo-octets';

    tu devrais peut être utiliser la fonction Format
    Voir ici : http://www.delphifr.com/tutoriaux/FORMATTEZ-VOS-CHAINES-CARACTERES-GRACE-FONCTION-FORMAT_301.aspx

    Des variables sont déclarées mais jamais utilisé et les composants ne sont pas nommées

    tout ceci n'a rien d'un code Expert

    Pour faire un Zip correcte pour DelphiFr voir ici :
    http://www.delphifr.com/tutoriaux/FAIRE-ZIP-POUR-POSTER-VOTRE-CODE-SOURCE-SUR_291.aspx

    Et l'excellent Project Cleaner :
    http://www.delphifr.com/codes/DELPHI-PROJECT-CLEANNER-DEPOC-OUTILS-POUR-NETTOYER-VOS_38066.aspx

    @ Matt : tu peux télécharger un nouvelle version de Delphi où même TurboDelphi chez Borland !!!

    @+
    Cirec

  • signaler à un administrateur
    Commentaire de insidewin le 04/12/2006 17:26:10

    Cirec :)

    Je travail 11/7 par jour , je developpe pour une societé , le problem est just ke je né pa 2 temps pour rendre mon source plus
    clean :-) , alors moi je donne un code ki fonctionne et c l'idé ki é importante , a toi 2 refaire le code plus proprement ,avrais dire ce code ne devrais pas etre de cette façon le vrais code doit pas apparaitre sur une fenetre (cacher) ,en suite envoyé le fichier compressé (méme pas avec zlib ,le niveau de compression doit etre plus elevé) par internet a un autre programme (client/serveur) resident sur 1 autre machine , je né pa trop de temps pour le conçevoir alors j'apporte just l'idé a toi 2 faire le reste .
    merci pour les liens .
      

  • signaler à un administrateur
    Commentaire de abdousoft le 11/12/2006 10:04:49

    Salut

    une tres bonne source

    Merci

  • signaler à un administrateur
    Commentaire de blatour le 11/12/2006 10:57:12

    Bonjour tout le monde,

    Insidewin, moi je gère une SSII en Afrique et je bosse au moins autant que toi. Par contre si je dois poster un code sur ce site, par respect pour les utilisateurs et les concepteurs du site, je revois mes sources et j'essaie de les commenter le mieux possible. Même dans ton activité et pour la maintenance des logiciels que tu développes, apprendre tout de suite à rédiger un code aérer et commenter est un plus certain.

    Pour Matt 261. La fonction Autorun pour les clé usb ne fonctionne pas.
    Tu peux aussi télécharger le FreePascal (http://www.freepascal.org/) ou Lazarus (http://www.lazarus.freepascal.org/).

    Bonne journée.

  • signaler à un administrateur
    Commentaire de Matt 261 le 11/12/2006 11:26:41

    @ Blatour : oui, je sais qu'il n'est pas possible de faire un autorun sur une clé USB avec Windows mais si un petit logiciel détecte un fichier autorun.inc et exécute l'action ou ouvre le logiciel indiqué dans le fichier, alors il sera possible de faire un autorun.

    Je vais regarder les deux logiciels que tu a indiqué.

    @+
    Matt

  • signaler à un administrateur
    Commentaire de rylryl le 12/12/2006 16:04:11

    Bonjour a tous,

    Interressant comme idée !
    Ce code me rapelle kekechose !!

    Sinon pour palier au prob de l'autorun il y a peut-être ça :
    http://www.delphifr.com/code.aspx?ID=30634

    Bonne continuation.
    A+
    ryl...

  • signaler à un administrateur
    Commentaire de Matt 261 le 12/12/2006 17:09:29

    Tiens, malgrès mes recherches, je n'avais pas trouvé ta source... Je vais potacer ça...

  • signaler à un administrateur
    Commentaire de waheb23 le 03/01/2007 14:33:08

    salut
          je peux pas telelcharger le zip.

  • signaler à un administrateur
    Commentaire de Matt 261 le 03/01/2007 18:43:19

    J'ai essayé et ça marche le téléchargement...

    Tu es bien loggué ?

  • signaler à un administrateur
    Commentaire de waheb23 le 04/01/2007 09:59:05

    bonjour
      
      j 'ai un probléme avec mon flash disk, il détecte ma is  
        
          il s'ouvre pas.idez moi svp.  

  • signaler à un administrateur
    Commentaire de kam_2006 le 04/01/2007 13:38:29

    Bonjour

    cette source est parfaite

Ajouter un commentaire

Pub



Appels d'offres

Plugin Dialer outlook
Budget : 2 000€
Travail graphique- ill...
Budget : 1 000€
creation de marque et ...
Budget : 1 000€

CalendriCode

Juillet 2008
LMMJVSD
 123456
78910111213
14151617181920
21222324252627
28293031   

Téléchargements

Logiciels à télécharger sur le même thème :

Boutique

Boutique de goodies CodeS-SourceS