BOITE À OUTILS DE VISUAL BASIC ! SOUS LES MAINS !!!
cs_EBArtSoft
Messages postés
4525
Date d'inscription
dimanche 29 septembre 2002
Statut
Modérateur
Dernière intervention
22 avril 2019
-
29 janv. 2004 à 14:47
cs_Warning Messages postés 516 Date d'inscription samedi 3 février 2001 Statut Membre Dernière intervention 24 octobre 2006 - 6 févr. 2004 à 21:11
cs_Warning Messages postés 516 Date d'inscription samedi 3 février 2001 Statut Membre Dernière intervention 24 octobre 2006 - 6 févr. 2004 à 21:11
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/19858-boite-a-outils-de-visual-basic-sous-les-mains
https://codes-sources.commentcamarche.net/source/19858-boite-a-outils-de-visual-basic-sous-les-mains
6 févr. 2004 à 21:11
david t marrant :) ...
A++
6 févr. 2004 à 20:00
personne ici ne doit ce justifier sur ces competences
on a rien a prouver ! moi ce qui m'amuse c'est ce
brave davidauche qui essaie tant bien que mal de
créer sa boite à outil.
En plus c'est pas une insulte c'est un clin d'oeil !
(Arfff c'est pas grave je doit être handicapé de la blague)
@+
Aller encore un cadeau :
http://msdn.microsoft.com/library/en-us/winui/winui/windowsuserinterface/windowing/windows/windowreference/windowfunctions/createwindowex.asp
6 févr. 2004 à 19:54
Ah!!, je cree cette barre?!! tt monde peut faire ça :p, mais comment profiter des controls existe déja, et comment extrait des choses cacher par windows.... là ce n'es pas pour tt monde :p ;)
Bon, merci qd meme, mais vraiment j'attends de toi des autres remarques et commentaires pour resoudre le probleme. Ce code n'existe ni sur ce site ni sur le net, là ou on peut vraiment programmer ;) et dire qu'on program qlq choses (question de dire tt possible ;))
thank Warning
a++++ gooooooo
davidauche
6 févr. 2004 à 18:56
EBartSoft ça fait longtemps que j'ai passé le cap des insultes ... donc avant de dire machin ne sais pas faire ça et bien soit on se renseigne sur le gar soit on ne dit rien... :P
a++
Warning
http://www.decompiler-vb.tk/
6 févr. 2004 à 18:42
Je vais tester ces modification, et on verra les résultats..;)
En fait pour wnc.lpfnWndProc, je ne peux pas jouer bq avec elle :(!! car apparement c'est de pure complexe hihi ;), mais t'as une intelligente idee EBArtSoft :p, lol je n'ai pas pense a ça!, je vais bavarder avec ça ce soir ;) merci
pour app.hinstance, interessante vraiment!!, pour moi tjrs fixe, peut etre car j'utilise le meme projet, pour cela reste fixe, je vais tester avec des autres cas ;)
Pour wnc.style là je suis sur qu'il faut la changer, bon je ne trouve pas la valeur de la const CS_GLOBALCLASS, mais voila mnt : CONST CS_GLOBALCLASS = &H4000 :)
Bon j'attends encore des commentaires comme de EBArtSoft
@+++ gooooo
6 févr. 2004 à 17:02
lol toujours aussi fort dans la "Recherche" !!!!
Mais ou trouve tu tout ses trucs !!!
Même Warning il connais pas ça, lui ... ;-P
sinon tu pourrais toujours essayer de
changer quelques lignes du genre :
...
wnc.lpfnWndProc = FuncPtr(Addressof WindowProc)
wnc.hInstance = App.hInstance
...
Private Function FuncPtr(Value as long) as long
FuncPtr=Value
end function
...
Public Function WindowProc(byval hWnd as long ,byval uMsg as long ,byval wParam as long , byval lParam as long ) as long
WindowProc = DefWindowProc (hwnd, umsg,wparam,lparam)
end function
...
Enfin je dit ça mais je suis pas sur je fait très peu d'API
j'ai pas testé mais tu vas trouver c'est sur !!!
@+
6 févr. 2004 à 13:41
' ça donne la meme resultat sous ide !
'declaration
Private Const WS_VISIBLE = &H10000000
Private Const WS_CHILD = &H40000000
Private Declare Function RegisterClass Lib "user32" Alias "RegisterClassA" (Class As WNDCLASS) As Long
Private Declare Function CreateWindowEx Lib "user32" Alias "CreateWindowExA" (ByVal dwExStyle As Long, ByVal lpClassName As String, ByVal lpWindowName As String, ByVal dwStyle As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hWndParent As Long, ByVal hMenu As Long, ByVal hInstance As Long, lpParam As Any) As Long
Private Type WNDCLASS
style As Long
lpfnWndProc As Long
cbClsExtra As Long
cbWndExtra As Long
hInstance As Long
hIcon As Long
hCursor As Long
hbrBackground As Long
lpszMenuName As String
lpszClassName As String
End Type
Private Sub Command1_Click()
Dim hwnd As Long
Dim wnc As WNDCLASS
'j'ai récupère ces valeur avec un autre code ;)
'mais peut être il manque des éléments dans la calsse !
wnc.style = 8 ' ici je croix qu'il faut changer cette valeur pour changer
'le style en global
wnc.lpfnWndProc = 4408229 ' cette valeur et tjrs fixe même après
'démarrage system
wnc.lpszClassName = "dav"
wnc.hInstance = 4194304 ' je croix tjrs fixe aussi
wnc.hCursor = 65553 ' pour le pointeur de la souris a l'intérieur du
'control
wnc.cbClsExtra = 0
wnc.cbWndExtra = 0
wnc.hbrBackground = 0
wnc.hIcon = 0
wnc.lpszMenuName = 0
wnc.lpszMenuName = 0
Call RegisterClass(wnc) ‘ registrer la classe puis la creer avec
'createwindowsex
hwnd = CreateWindowEx(0&, "dav", "davidauche", WS_VISIBLE Or WS_CHILD, 100, 100, 200, 200, Me.hwnd, 0&, App.hInstance, 0&)
End Sub
'c'est une essaie de résoudre le problème de compilation, le problème
'cette fois que windows affiche message d'erreur en dissent qu'il va
'fermer l'exe!!! Chiant!!
'là je doute que il y a une petite problème dans la classe?!!
'sinon, on peut pas empêcher ou débuguer l'exe pour empêcher la
'fermeture de l'exe, juste pour voir les résultats et les erreurs?
'merci d'avance si qlqn peut m'aider même avec les idées et ces
'remarques ;)
a+++ ;)
3 févr. 2004 à 13:24
Bon courage a toi
En fait, le control se cree meme apres la compilation, sauf n'est plus visible !!!! je ne comprends pas pourquoi!!!!
@++++++
3 févr. 2004 à 11:48
Stp ne prends pas cela comme comme tel....
c'est juste la boite à outils !!! elle y est deja dans vb6.
Donc pour le respect des autres ,je pense qu'il ne faut pas mettre
sur le site des sources inutiles ou qui existent dejà.
imaginer une personne qui fait une recherche sur 9707 sources ...
la mienne viendra .
je remerci tous les acteurs du site qui m'ont permi de faire un grand
programme sur le pmu.j'apprends tjrs du vb6 et je serai tjrs nul
A++
2 févr. 2004 à 17:13
Si qlqn d'autres interesser, je suis là ....
Merci EBArtSoft
a+++
gooooooooooo je me chauffe en plus hihi
2 févr. 2004 à 16:16
pour en arriver la il te faudra encore regler bcp bcp bcp d'autre problemes lié au code.
aller si tu travail dure peu etre y arriveras tu !
<:O)
@+
2 févr. 2004 à 13:57
mais là Warning vient de me decourage vraiment a cause les copyright MS, si vraiment interdit, je vais juste essayer de tester la solution cette fois, mais apres je ne refait plus ;), juste pour dire que c'est possible :p
et j'aime savoir si vraiment interdit....
merci a tt
a++
1 févr. 2004 à 20:49
a++
Warning
1 févr. 2004 à 20:47
projet qui a mon avis devrais mettre pas mal de temps
a voir le jour ! mais tient bon peut etre arrivera tu as
nous refaire un VB qui sait !
d'ici la...
@+
1 févr. 2004 à 20:44
on attend tes codes sources mr soleildz :p;)
a+++
gooo
1 févr. 2004 à 20:41
il faut utiliser dll avec getclassinfo..., faut pas dire impossible ;) j'aime pas beaucoup ce terme :p
a++++ ;)
1 févr. 2004 à 15:58
1 févr. 2004 à 08:32
Warning
http://www.decompiler-vb.tk/
31 janv. 2004 à 16:54
Warning, on peut aussi recperer la classe de la liste des proprietes, alors là ça t'interesse beaucoup surtout dans ton prog reformervb, c'est mieux les afficher directement dans la liste de vb ..;):p
voilà, un de ces interets :p
a++++
goooooooooooooo ;)
31 janv. 2004 à 00:28
Warning
http://www.decompiler-vb.tk/
30 janv. 2004 à 16:32
l'interet de ça, c'est de gagner le temps de la pragrammation des boites a outils (en vb ou en autres), en plus, si je veux utiliser la boite à outils de vb dans mon programme pour ajouter des controls dynamique!!!!! (ça sans interet??!!) surtout que pour la création des controls dynamique pas encore bq d solution, et on n'arrive pas juste ce moment de profiter 100% de la creation dynamique (avec les evenement, sans charger deja des controls ...):p
ça montre que on peut profiter des autres controls sans casser la tete a programmer ;)
il y a des autres interet mr pi7438, pense un peu ;)
shadowmoy: c'est utilisable meme dans les exe et pas seulement dans l'ide :p
Bon, pour probleme de compilation, simplement il faut enregistrer la classe dans les registres de windows comme classe global(car c'est une classe propre de vb et ne se trouve pas dans la liste des classes SYSTEM :p), en utilisant l'api registerclass , unregisterclass avec const CS_GLOBALCLASS (pour dire que c'est global) dans la Structure WNDCLASS...
Bon pi7438 desolee si tu ne comprends pas beaucoup, faut avoir des connaissances en api et en classes ;)
a+++, merci quand meme
j'attends vos critiques encore ;) :p
30 janv. 2004 à 03:54
1 - cette toolbox appartient a microsoft
2 - ce code n'est utilisable que dans l'ide
3 - je vois pas trop l'interet non plus
4 - c'est marrant quand meme ^^
29 janv. 2004 à 20:52
elle sert a quoi cette boite a outils ??
c'est debile, car elle existe deja sous vb pour crée les composants.
il faudrait que quelqu'un m'explique l'interet de ce code, a part afficher 2 ou 3 icones marrants ......
29 janv. 2004 à 18:48
les Styles Windows :
WS_CHILDWINDOW ou bien WS_CHILD
WS_VISIBLE
WS_CLIPSIBLINGS (je sais rien a quoi sert çà!)
WS_OVERLAPPED
pour les STYLE EXTENDED :
WS_EX_LEFT
WS_EX_LTRREADING
WS_EX_RIGHTSCORLLBAR
WS_EX_ACCEPTFILES
pour STYLE de la classe:
CS_DBLCLKS.
Pour les valeurs de const se trouve partout
a+++
29 janv. 2004 à 16:12
géneralement il faut utiliser un add-in pour ces classes, mais on peut aussi l'utiliser dans nos code ;), il faut bien programmer ces classes et surtout utiliser les structures... ;)
si qlqn trouve des solu pour la compilation ...
a++
29 janv. 2004 à 14:47
reponse : bah rien car une fois ton projet compilé ya plus personne pour faire un RegisterClass de la fenetre donc plus de palette !
(sauf peut etre pour un addin... faut il encore en avoir une quelquonque utilité)
conclusion : I-n-u-t-i-l-i-s-a-b-l-e
@+