CodeS-SourceS
Rechercher un code, un tuto, une réponse

[vb6] xp style

Octobre 2017


[vb6] xp style



Le fichier Manifest


Créer un fichier manifest nommé monapp.exe.manifest
et le placer dans le dossier de l' exe.
Remplacer le nom "monapp" par le nom de votre exe.


<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<name="monapp" type="win32"/>
<description>QCM</description>
<dependency>
<dependentAssembly>


</dependentAssembly>
</dependency>

InitCommonControls


Déclarer la fonction InitCommonControls en tant que private dans un module
de formulaire, sans le private pour un module standard:

'
Option Explicit
Private Declare Sub InitCommonControls Lib "COMCTL32.DLL" ()
'

Appel de la fonction


Appeler la fonction dans le form_initialize, PAS dans le form_load:


'
Private Sub Form_Initialize()
InitCommonControls
End Sub
'

Compiler, lancer


Pour les contrôles inclus dans un Frame, ça ne marchera pas parce que
le contrôle Frame n' a pas de hDC. Le remplacer par un Picture Box.

Pour appliquer à l' IDE:

Placer VB6.exe.manifest dans le dossier de vb6.exe. C'est tout.
Publié par katsankat.
Ce document intitulé «  [vb6] xp style  » issu de CodeS-SourceS (codes-sources.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Tutoriel pour remplir un treeview sous access (2000)
Creation utilisateurs win 2003 avec un script vbs