Cita:
Iniciado por diegoc Hola,
Lo que puedes hacer es actualizar el formato de VB6 a XP de la siguiente manera:
Generas un archivo de texto, en el mismo directorio del ejecuatable, con el mismo nombre y le agregas al final ".manifest". De manera que queda aplicacion.exe.manifest
En su interior colocas:
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<assemblyIdentity
name="Visual Basic 5.0"
processorArchitecture="x86"
version="6.0.89.88"
type="win32"
/>
<description>Visual Basic 5.0</description>
<dependency>
<dependentAssembly>
<assemblyIdentity
type="win32"
name="Microsoft.Windows.Common-Controls"
version="6.0.0.0"
processorArchitecture="x86"
publicKeyToken="6595b64144ccf1df"
language="*"
/>
</dependentAssembly>
</dependency>
</assembly>
en donde la leyenda "Visual Basic 5.0" la reeemplazas por el nombre de la aplicación y en el código fuente de tu aplicación colocas:
Private Declare Sub InitCommonControls Lib "comctl32.dll" ()
Private Sub Form_Initialize()
InitCommonControls
End Sub
Puedes hacer esto con cualquier aplicación antigua y tendrá un aspecto muy parecido a XP si corre en SO XP.
Para mayor información ingresa a
http://www.elguille.info/default.aspx
Saludos
Diego
hola no entendi muy bien se hace asi? :
1ro. Genero la aplicacion.exe en un directorio
2do. Creo un documento de texto llamado aplicacion.exe.manifest
3ro. abro el documento de texto y pongo y grabo esto:
Cita: <?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<assemblyIdentity
name="Visual Basic 5.0"
processorArchitecture="x86"
version="6.0.89.88"
type="win32"
/>
<description>Visual Basic 5.0</description>
<dependency>
<dependentAssembly>
<assemblyIdentity
type="win32"
name="Microsoft.Windows.Common-Controls"
version="6.0.0.0"
processorArchitecture="x86"
publicKeyToken="6595b64144ccf1df"
language="*"
/>
</dependentAssembly>
</dependency>
</assembly>
4to. modifico mi aplicacion poniendo esto:
Cita: Private Declare Sub InitCommonControls Lib "comctl32.dll" ()
Private Sub Form_Initialize()
InitCommonControls
End Sub
y ejecuto el aplicacion.exe?