Discussion :

[AL1986]

Salut,
J'aimerai connaître la signification de certaines constantes VB6. Je ne m'y connais pas en VB et les définitions proposées pour certaines ne sont pas très explicites. Y aurait-il un document qui recense les constantes vb* avec une interprétation claire et facile à assimiler pour chacune ? Merci.

[LeForestier]

Bonjour,
Je comprend pas bien ton problème, si tu veux avoir les constantes VB6 d'une fonction tu sélectionne cette fonction et tape F1, en principe, toutes les constantes dédiées à cette fonction sont expliquées dans la page d'aide. !
A+
Edit : exemple, tu tape n'importe où le texte MsgBox, double click sur le mot et ...F1 , toutes les constantes de msgBox sont répertoriées.

[AL1986]

En fait, j'aimerai trouver des équivalents Delphi à certaines constantes VB6 dont je ne comprends pas très bien la signification, en particulier :

Code VB :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
vbhidden
vbnormalfocus
vbTwips
vbcharacters
vbPRORLandscape
vbPRORPortrait
vbnormal
vbObjectError
vbdirectory
vb3Dhighlight
vb3dshadow
vb3DDKShadow
vbhide
vbcftext
vbfixeddouble
vbminimized

[Vld44]

je pense que ce ne sont pas des constantes, mais des énums, c'est pourquoi sorties de leurs contextes cela n'a aucun sens.

Fait F2, et recherches-en une pour voir.

[AL1986]

Juste un exemple, pour vbhidden voilà ce que donne F2 :

Const vbHidden = 2
Member of VBA.VbFileAttribute
Attributes argument constant for Dir, GetAttr, or SetAttr

voilà ce que donne F1

constant | value | description
-----------------------------
vbHidden | 2 | Hidden

Et cela ne m'avance pas à grand chose.

[rv26t]

Bonjour,

Bizarre, F1 est normalement plus explicite.

Fichier et répertoire
vbNormal = 0 Normal (valeur par défaut pour Dir et SetAttr)
vbHidden = 2 Masqué
vbDirectory = 16 Répertoire ou dossier

Imprimante
vbPRORPortrait = 1 : Documents imprimés dans le sens de la hauteur (Portrait)
vbPRORLandscape = 2 Documents imprimés dans le sens de la largeur (Paysage)

vbCFText = format des données pour le presse papier (texte)

vbMinimized = Réduction : état de la feuille vb réduit (minimisé)

vbObjectError : constante à rajouter pour créer ses propres N° d'erreur
utilisateur, à exploiter ensuite avec Err.Number

Couleur système
Surbrillance
vb3DHighlight
Ombrage
vb3DShadow
vb3DDKShadow

Voilà quelques éléments
A+, Hervé.

[AL1986]

Bizarre, F1 est normalement plus explicite.

J'ai eu un tableau avec les différentes constantes, mais c'est toujours pas explicite : vbhidden 2 masqué. Qu'implique le masqué ? Qu'est ce qui est masqué ?..

[SfJ5Rpw8]

J'ai eu un tableau avec les différentes constantes, mais c'est toujours pas explicite : vbhidden 2 masqué. Qu'implique le masqué ? Qu'est ce qui est masqué ?..

il faut ensuite regarder l'aide des fonctions qui utilisent ces constantes. ..Dir, GetAttr ou SetAttr,

[AL1986]

il faut ensuite regarder l'aide des fonctions qui utilisent ces constantes. ..Dir, GetAttr ou SetAttr,

Pour GetAttr, voilà ce que ça donne :

GetAttr(pathname)

The required pathname argument is a string expression that specifies a file name. The pathname may include the directory or folder, and the drive.

Return Values

The value returned by GetAttr is the sum of the following attribute values:

Constant Value Description
vbNormal 0 Normal.
vbReadOnly 1 Read-only.
vbHidden 2 Hidden.
vbSystem 4 System file.
vbDirectory 16 Directory or folder.
vbArchive 32 File has changed since last backup.

On comprend que GetAttr prend un chemin en entrée et renvoie la somme des constantes (là je ne comprends pas). Cela veut-il dire que le résultat est toujours 0+1+2+4+16+32 ????
A part ça, comme je l'ai déjà dit, quelques descriptions ne sont pas claires : vbnormal 0 Normal ???

[rv26t]

vbhidden 2 masqué. Qu'implique le masqué ? Qu'est ce qui est masqué ?..

rv26t a dit:
Fichier et répertoire
vbNormal = 0 Normal (valeur par défaut pour Dir et SetAttr)
vbHidden = 2 Masqué
vbDirectory = 16 Répertoire ou dossier

J'ai indiqué "Fichier et répertoire"
Si cet attribut est mis le fichier (ou le répertoire) est caché.

Pour GetAttr
En fait tu peux avoir une somme de certains de ces attributs.
Si tu as un répertoire caché, tu auras 2+16 = 18
16 tu as un répertoire, 2 il est caché.
Ceci est spécifique aux fichiers. Il sont par puissance de 2 pour pouvoir les distinguer séparément par un "AND".
si pour "GetAttr(NomFichier) And vbHidden", une valeur non nulle est renvoyée le fichier comporte l'attribut caché

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
'pour un répertoire "Projets" 
MsgBox GetAttr("c:\projets") 
'te donnera 16 => répertoire.

0 : normal, il n'est pas caché, il n'est pas en lecture seule, ce n'est pas un fichier système ni un répertoire, c'est un fichier normal.

A+, Hervé.