Windows XP ulkoasun saa seuraavasti:
Esittele tämmönen Api:
Private Declare Function InitCommonControls Lib "comctl32.dll" () As Long
Sitten tarvitaan tämmönen koodi vaihtamaan ulkoasua:
Private Sub Form_Initialize() InitCommonControls End Sub
Sitten teet exe:n ja laitat nimen <exenimi>.exe, ja <exenimi> kohdalle tietenkin haluamasi nimi.
Sen jälkeen tehdään joku manifesti, jota Windows etsii aina käynnistettäessä exeä. manifestiin kirjoitetaan (avaa notepadilla <exenimi>.exe ja kirjoita):
<?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="mash"/> <description>Enter your Description Here</description> <dependency> <dependentAssembly> <assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" language="*" processorArchitecture="*" publicKeyToken="6595b64144ccf1df" /> </dependentAssembly> </dependency> </assembly>
Ja tallenna manifesti <exenimi>.exe.manifest
Sitten käynnistä.
Minulla ei toiminut ensimmäisellä kerralla ja exe jäi työpöydälle ja kun sitä yritti poistaa sanoi "Ei voi poistaa; yhteiskäyttövirhe..." mutta se lähtee pois ainakin
GiPolla. Google...
ja tämä löytyi Allapista
Muistaakseni tämäkin toimi:
Application.EnableVisualStyles
.NET:ssä ehkä. VB6:lla ainoa tapa on juuri tuo manifest-tiedosto.
Kannattaa laittaa manifesti VB:n kansioon niin kontrolleiden tyylit näkyvät jo muokkaustilassa.
Milläs nimellä se manifesti pitää silloin tallentaa?
Samoin kuin omalle ohjelmalle mutta nimenä vb:n exen nimi. Eli: VB6.exe.manifest
Aihe on jo aika vanha, joten et voi enää vastata siihen.