vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Mails senden, abrufen und decodieren - ganz easy ;-)  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Newsletter  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2017
 
zurück
Rubrik: Oberfläche · Sonstiges   |   VB-Versionen: VB5, VB610.12.03
XP Style mit Ressourcendatei einfügen

Hier wird beschrieben, wie man den XP Style über eine eigene Ressourcendatei ins Projekt einbindet.

Autor:   Torsten ArfellerBewertung:     [ Jetzt bewerten ]Views:  19.063 
ohne HomepageSystem:  WinXP, Win8, Win10 Beispielprojekt auf CD 

Möchten Sie Ihrem Projekt bereits in der IDE eine Ressourcendatei einfügen, die den Code für die XP Styles enthält?
Alles was Sie hierfür brauchen, haben Sie bereits installiert bzw. befindet sich noch ungenutzt auf der VB 6 CD.

Auf der CD befindet sich im Ordner \COMMON\TOOLS\VB\RESOURCE der so genannte Ressourcencompiler, rc.exe (das ist nicht dasselbe, wie der VB eigene Ressourceneditor). Sämtliche Dateien im genannten Ordner kopieren Sie bitte auf die Festplatte. Der Ressourcencompiler ist damit schon betriebsbereit, er muss nicht installiert werden. Erstellen Sie nun eine Textdatei XPStyle.txt, legen diese im Ordner des Ressourcencompilers ab und fügen ihr nachfolgenden Code hinzu:

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<assemblyIdentity type="win32" processorArchitecture="*" version="6.0.0.0" name="Company" />
  <dependency>
  <dependentAssembly>
  <assemblyIdentity type="win32"
    name="Microsoft.Windows.Common-Controls"
    version="6.0.0.0"
    language="*"
    processorArchitecture="*"
    publicKeyToken="6595b64144ccf1df"/>
  </dependentAssembly>
  </dependency>
</assembly>

Jetzt erstellen Sie eine weitere Textdatei im selben Ordner und benennen diese in XPStyle.rc um (ohne die Dateierweiterung .txt). Diese öffnen Sie mit Notepad und fügen folgende Zeile ein:

1 24 XPStyle.txt

Zur Erklärung: die 1. Zahl ist der Ressourcenname, die 2. der Ressourcentyp.
Die Sprache der Ressource wird beim Ressourcencompiler standardmäßig auf English(USA), (1033) eingestellt.

Diese Datei speichern Sie ebenfalls ab (ohne die Dateierweiterung .txt). Nun öffnen Sie die DOS- Eingabeaufforderung und hangeln sich mit dem <cd> Befehl zu dem Ordner, in dem der Ressourcencompiler liegt. Dort angekommen geben Sie den folgenden Befehl ein:

RC /r /fo XPStyle.res XPStyle.rc

Mit diesem Befehl wird aus der Datei XPStyle.rc die Datei XPStyle.res erstellt.
Nun können Sie ein neues Projekt mit VB6 öffnen und die Datei XPStyle.res über den Projektexplorer dem Projekt zufügen.

Was jetzt noch fehlt ist die bereits bekannte API Deklaration:

' Diesen Code in ein Modul einfügen
Public Declare Sub InitCommonControls Lib "comctl32.dll" ()

sowie die Initialisierung

' Diesen Code in das Initialize-Ereignis der Form einfügen
Private Sub Form_Initialize() 
  ' Betriebssystemabfrage
  If XP = True Then ' oder so ähnlich
    Call InitCommonControls 
  End If
End Sub

Wenn Sie jetzt aus Ihrem Projekt eine .EXE-Datei erstellen und diese aufrufen, ist der XP Style bereits ohne .manifest Datei oder Eingriff über den Ressourcenhacker sichtbar.
Außerdem haben Sie jetzt eine Ressourcendatei, die Sie ab sofort für alle Projekte verwenden können, die später mit dem XP Style dargestellt werden sollen.

Happy Styling
 

Dieser Tipp wurde bereits 19.063 mal aufgerufen.

Voriger Tipp   |   Zufälliger Tipp   |   Nächster Tipp

Über diesen Tipp im Forum diskutieren
Haben Sie Fragen oder Anregungen zu diesem Tipp, können Sie gerne mit anderen darüber in unserem Forum diskutieren.

Aktuelle Diskussion anzeigen (1 Beitrag)

nach obenzurück


Anzeige

Kauftipp Unser Dauerbrenner!Diesen und auch alle anderen Tipps & Tricks finden Sie auch auf unserer aktuellen vb@rchiv  Vol.6
(einschl. Beispielprojekt!)

Ein absolutes Muss - Geballtes Wissen aus mehr als 8 Jahren vb@rchiv!
- nahezu alle Tipps & Tricks und Workshops mit Beispielprojekten
- Symbol-Galerie mit mehr als 3.200 Icons im modernen Look
Weitere Infos - 4 Entwickler-Vollversionen (u.a. sevFTP für .NET), Online-Update-Funktion u.v.m.
 
   

Druckansicht Druckansicht Copyright ©2000-2017 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel