Hit-Parade .VB Research Center . Compteur
Accueil ~  Code ~  Programmes ~  Api ~  Forum ~  Cours ~  Livres ~  Quiz ~  Annuaire
~ Edito ~
12/03/2006 @ 13:39
Depuis la dernière mise à jour (qui remonte à... oulala plusieurs mois), un petit ménage de printemps s'impose. Ca tombe bien, c'est presque la période.
Au menu, et progressivement sur les jours à venir, rafraîchissement de plusieurs fonctions et procédures, nouvelles APIs et nouveaux programmes.

~ Rechercher ~

  

~ Annuaire VB ~
 Rechercher un site :
  

~ Partenaires ~

~ L'Astuce du Jour ~

Comment faire apparaître les fenêtres de progression Windows lors d'une copie de fichier?
Pour donner un effet à une application on peut vouloir faire apparaître les fenêtres standards de windows lors d'une copie de fichiers (ou déplacement). On utilise alors la fonction API SHFileOperation. Cette fonction propose alors tout un éventail de possibilité pour la manipulation de fichiers suivant les constantes utilisées.
FOF_NOCONFIRMATION, ne demande aucune confirmation pour l'opération courante.
FOF_NOCONFIRMMKDIR, ne demande pas la confirmation de la création du répertoire de destination si celui-ci n'existe pas.
FOF_RENAMEONCOLLISION, renomme automatiquement le fichier en cas de conflit.
FOF_SILENT, copie ou déplace le fichier sans afficher de fenêtre de progression.
FOF_SIMPLEPROGRESS, affiche une fenêtre "simple" de progression (sans texte), lors de la copie ou du déplacement de fichier.
Il faut utiliser la structure ci-dessous, puis le code est à adapter suivant vos besoins.
A noter, que j'ai changé la déclaration de la fonction API, chez moi le Alias "SHFileOperationA" (non présent ici) posait problème...

Private Declare Function SHFileOperation Lib "shell32.dll" _
        (lpFileOp
As SHFILEOPSTRUCT) As Long
Private Type
SHFILEOPSTRUCT
    hwnd
As Long
   
wFunc As Long
   
pFrom As String
   
pTo As String
   
fFlags As Integer
   
fAnyOperationsAborted As Long
   
hNameMappings As Long
   
' uniquement utilisé avec FOF_SIMPLEPROGRESS
   
lpszProgressTitle As String
End Type

Private Const
FOF_NOCONFIRMATION = &H10
Private Const FOF_NOCONFIRMMKDIR = &H200
Private Const FOF_RENAMEONCOLLISION = &H8
Private Const FOF_SILENT = &H4
Private Const FOF_SIMPLEPROGRESS = &H100

Private Const FO_COPY = &H2

Dim lgRep As Long
Dim
shStruct As SHFILEOPSTRUCT
shStruct.pFrom = FileName
shStruct.pTo = ToDir
shStruct.fFlags = FOF_NOCONFIRMATION
shStruct.wFunc = FO_COPY
lgRep = SHFileOperation(shStruct)
17/04/2006 @ 19:04 - Code
Petite mise à jour avec quatre nouvelles fonctions à découvrir dans la rubrique "Code".
A+
13/03/2006 @ 19:11 - API
On commence la semaine en douceur avec 5 fonctions APIs (certaines sont des ajouts, d'autres des modifications), avec leurs exemples.
Je constate que le code de ces derniers est un peu trop large pour l'affichage en 800x600... je le note pour le rectifier d'ici la fin de la semaine. D'ailleurs, ça me fait penser que l'affichage dans d'autres résolutions (par le bloc "affichage" dans la colonne de droite) donne n'importe quoi... à regarder aussi donc.
Have a nice evening...
12/03/2006 @ 12:03 - Ménage et fonds de tiroir
Après une loooongue période de sommeil je reprend le clavier pour dépoussierer le site.
Il faut dire qu'avec le temps, il y a pas mal de chose qui ne vont plus. Des liens qui se cassent, quelques bugs qui s'entassent, et des compteurs qui s'affolent .
En plus, si le site tourne en rond, de mon côté je continue malgré tout à accumuler du code. Et c'est quand même mieux si tout le monde peut en profiter.
Ca fait beaucoup de boulot tout ça et il y en a donc pour quelques jours. Voyons... ça fait une bonne trentaine de fonctions supplémentaires qui devraient arriver, quelques APIs et un petit programme pour se divertir.

Pour ce qui est de la reprise du site, c'est toujours d'actualité. On en reparlera plus tard...
~ En stock ~
. 214 fonctions API
. 12 applications
. 130 fonctions
. 38 liens dans l'annuaire
. 3 questionnaires
. 20 livres sur Visual Basic
. 1474 icônes

~ Affichage ~

~ Recommander ~





Géré par LBB.ORG
Visual Basic Research Center - (c) 2000/2002 -  Webmaster : docvb (chez) free (point) fr