Commentaires de clementpat sur tout CodeS-SourceS

291 commentaire(s) de clementpat sur des sources sur tout CodeS-SourceS

Le : 02/02/2008 10:10:12
Source : LOGICIEL SEMELLE - CALCUL DE BÉTON ARMÉ

Tres technique .Utile certainement pour les pro .

Le : 31/01/2008 20:45:38
Source : CALCUL DE MATERIAUX (BRIQUE PARPAING BETON ) (SABLE CIMENT GRAVIER ) PRIX DE REVIENT .

Bonjour

je n'ai pas encore pris le temps de mettre a jour ce programme : les sacs de ciment sont en 50 kg............mais la conversion est facile .

voici l'instal complete pour ceux qui ne possedent pas VB6

A charger ici :

http://www.bonprojet.com/CalculMateriaux.exe

Le : 08/01/2008 22:34:40
Source : PROGRAMME QUI ENREGISTRE LES ACTIONS DE LA SOURIS ,LES TOUCHES CLAVIER DE A -> Z ,ET LE CLAVIER NUMERIQUE

Je viens de voir le probleme dans ta transformation tu n'utilise pas les bon code de touche :

***********************
'la touche (Slash)
touche(56) = 47
'la touche (Dot)
touche(57) = 46
**********************

46 c'est "SUPPR"
47 c'est "AIDE"

voici le bon code pour les touches :
Donc pour toi
***************
Je voulais rajouter le (.) et le (/)
***************
110 et 111 mais attention il faut les taper sur le pavé numerique

Code des touches :

Constante Valeur Description
vbKeyLButton 1 Bouton gauche de la souris
vbKeyRButton 2 Bouton droit de la souris
vbKeyCancel 3 Touche ANNUL
vbKeyMButton 4 Bouton central de la souris
vbKeyBack 8 Touche RET.ARR
vbKeyTab 9 Touche TAB
vbKeyClear 12 Touche EFFACER
vbKeyReturn 13 Touche ENTRÉE
vbKeyShift 16 Touche MAJ
vbKeyControl 17 Touche CTRL
vbKeyMenu 18 Touche MENU
vbKeyPause 19 Touche PAUSE
vbKeyCapital 20 Touche VERR.MAJ
vbKeyEscape 27 Touche ÉCHAP.
vbKeySpace 32 Touche ESPACE
vbKeyPageUp 33 Touche PG PRÉC.
vbKeyPageDown 34 Touche PG SUIV.
vbKeyEnd 35 Touche FIN
vbKeyHome 36 Touche ORIGINE
vbKeyLeft 37 Touche FLÈCHE VERS LA GAUCHE
vbKeyUp 38 Touche FLÈCHE VERS LE HAUT
vbKeyRight 39 Touche FLÈCHE VERS LA DROITE
vbKeyDown 40 Touche FLÈCHE VERS LE BAS
vbKeySelect 41 Touche SELECT
vbKeyPrint 42 Touche IMPR.ÉCRAN
vbKeyExecute 43 Touche EXÉCUTE
vbKeySnapshot 44 Touche INSTANTANÉ
vbKeyInsert 45 Touche INSER
vbKeyDelete 46 Touche SUPPR.
vbKeyHelp 47 Touche AIDE
vbKeyNumlock 144 Touche VERR.NUM

Les constantes KeyA à KeyZ sont identiques à leurs équivalents ASCII : 'A' à 'Z'
Constante Valeur Description
vbKeyA 65 Touche A
vbKeyB 66 Touche B
vbKeyC 67 Touche C
vbKeyD 68 Touche D
vbKeyE 69 Touche E
vbKeyF 70 Touche F
vbKeyG 71 Touche G
vbKeyH 72 Touche H
vbKeyI 73 Touche I
vbKeyJ 74 Touche J
vbKeyK 75 Touche K
vbKeyL 76 Touche L
vbKeyM 77 Touche M
vbKeyN 78 Touche N
vbKeyO 79 Touche O
vbKeyP 80 Touche P
vbKeyQ 81 Touche Q
vbKeyR 82 Touche R
vbKeyS 83 Touche S
vbKeyT 84 Touche T
vbKeyU 85 Touche U
vbKeyV 86 Touche V
vbKeyW 87 Touche W
vbKeyX 88 Touche X
vbKeyY 89 Touche Y
vbKeyZ 90 Touche Z

Les constantes Key0 à Key9 sont identiques à leurs équivalents ASCII : '0' à '9
Constante Valeur Description
vbKey0 48 Touche 0
vbKey1 49 Touche 1
vbKey2 50 Touche 2
vbKey3 51 Touche 3
vbKey4 52 Touche 4
vbKey5 53 Touche 5
vbKey6 54 Touche 6
vbKey7 55 Touche 7
vbKey8 56 Touche 8
vbKey9 57 Touche 9

Touches du pavé numérique
Constante Valeur Description
vbKeyNumpad0 96 Touche 0
vbKeyNumpad1 97 Touche 1
vbKeyNumpad2 98 Touche 2
vbKeyNumpad3 99 Touche 3
vbKeyNumpad4 100 Touche 4
vbKeyNumpad5 101 Touche 5
vbKeyNumpad6 102 Touche 6
vbKeyNumpad7 103 Touche 7
vbKeyNumpad8 104 Touche 8
vbKeyNumpad9 105 Touche 9
vbKeyMultiply 106 Touche SIGNE MULTIPLICATION (*)
vbKeyAdd 107 Touche SIGNE PLUS (+)
vbKeySeparator 108 Touche ENTRÉE (pavé numérique)
vbKeySubtract 109 Touche SIGNE MOINS (-)
vbKeyDecimal 110 Touche POINT DÉCIMAL (.)
vbKeyDivide 111 Touche SIGNE DIVISION (/)

Touches de fonction
Constante Valeur Description
vbKeyF1 112 Touche F1
vbKeyF2 113 Touche F2
vbKeyF3 114 Touche F3
vbKeyF4 115 Touche F4
vbKeyF5 116 Touche F5
vbKeyF6 117 Touche F6
vbKeyF7 118 Touche F7
vbKeyF8 119 Touche F8
vbKeyF9 120 Touche F9
vbKeyF10 121 Touche F10
vbKeyF11 122 Touche F11
vbKeyF12 123 Touche F12
vbKeyF13 124 Touche F13
vbKeyF14 125 Touche F14
vbKeyF15 126 Touche F15
vbKeyF16 127 Touche F16

Le : 08/01/2008 22:20:42
Source : PROGRAMME QUI ENREGISTRE LES ACTIONS DE LA SOURIS ,LES TOUCHES CLAVIER DE A -> Z ,ET LE CLAVIER NUMERIQUE

Ha ok , j'avais lu "S" a la place de "$", je vais regarder le code pour voir le probleme.

Le : 08/01/2008 20:56:20
Source : PROGRAMME QUI ENREGISTRE LES ACTIONS DE LA SOURIS ,LES TOUCHES CLAVIER DE A -> Z ,ET LE CLAVIER NUMERIQUE

DOnc il faut transformer le code pour que quand la touche majuscule est maintenue , celui-ci le prenne en compte !

Le : 08/01/2008 19:07:06
Source : PROGRAMME QUI ENREGISTRE LES ACTIONS DE LA SOURIS ,LES TOUCHES CLAVIER DE A -> Z ,ET LE CLAVIER NUMERIQUE

Il faut que je verifie le code , mais je pense que cela ne fonctionne pas , car pour avoir le "." et le "/" il faut avoir appuyé d'abord sur la touche "majuscule".........
et rien dans mon programme ne le signal , donc la programmation ne fonctionne pas en lecture.

testez avec ";" ou ":" pour voir si cela fonctionne........ d'apres moi cela doit fonctionner.

pour rajouter alors "." et "/" il faut transformer le code pour inclure en plus la touche majuscule .

Le : 07/12/2007 21:11:37
Source : CALCUL DE MATERIAUX (BRIQUE PARPAING BETON ) (SABLE CIMENT GRAVIER ) PRIX DE REVIENT .

Oui , y a toujours mieux !

j'aurais du bloquer les cases surface , car apres avoir indiqué Longueur et largeur la surface se calcul automatiquement.

J'ai pas le courage de prendre le temps de revoir ce programme ...........mais vous pouvez le reprendre si vous voulez , le code est tres simple a comprendre.

Le : 04/09/2007 23:38:02
Source : LEMMINGS VB6

j'ai programmé aussi des jeux il y a longtemps , cette source est pour moi un chef-d'oeuvre

tres bon et long boulot bravo a toi
10/10

Le : 16/07/2007 21:34:10
Source : CRÉATION D'UN FICHIER À PARTIR DE PLUSIEURS FICHIER (POUR ÉVITER LES COPIER-COLLER)

oui tu as raison , le curseur d'un des 2 fichiers etait mal placé.

ya plus de probleme .

Le : 16/07/2007 14:37:13
Source : CRÉATION D'UN FICHIER À PARTIR DE PLUSIEURS FICHIER (POUR ÉVITER LES COPIER-COLLER)

le fichier me donne :

1
2
3
4

5
6
7
8

avec le point virgule cela me donne :

12345678

moi je veux que cela donne :

1
2
3
4
5
6
7
8