Is this still valid?

[Zlatko Vid]

efgee code about XP manifest:
OR THIS WORK ONLY IF I DECIDE TO RECOMPILE FB code?

efgee

    Guest

WinXP+ gui theme for oxygen apps
« on: January 05, 2012, 03:04:55 PM »
Hi,
one way of adding extended WinXP+ windowing theme to oxygen apps is to tweak oxygen itself.
(the other way would be to use resourcehacker or something...)

Instructions:
1.) open file "o2hdrs.bas" in the oxygen src directory
2.) add the code below at line 944 (oxygen version A38)
3.) recompile oxygen with freebasic using go2.bat
4.) replace current oxygen dll with newly generated one
5.) done

Charles, feel free to incorporate the code below into the main trunk.
(but don't feel obligated...)

The code below is for a 32 bit OS.

[Zlatko Vid]

oups this is code ...

Code Select Expand

    #if 1
        'TEST STUB FOR MANIFEST ( FOR WINDOWS 32 BIT )
        '   
        w5=".resources"+cr+_
          "hl0 hl0 hl1 hw0 hw1"+cr+_               '00 MAIN DIRECTORY  CHARACTERISTICS DATETIMESTAMP MAJORMINORVERSION NUMOFNAMES NUMOFIDS
          "hl18 hl80000018"+cr+_                   '10   ENTRY RT_MANIFEST
          "hl0 hl0 hl1 hw0 hw1"+cr+_               '18   MANIFEST DIRECTORY
          "hl1 hl80000030"+cr+_                    '28     ID 1 STRINGS
          "hl0 hl0 hl1 hw0 hw1"+cr+_               '30     ID1 LANGUAGE DIRECTORY MANIFEST
          "nl0 hl48"+cr+_                          '40       ID1L MANIFEST ENGLISH
          "ga data1 nl634 nl0 hl0"+cr+_            '48       DATA ENTRY: ADDRESS LENGTH CODEPAGE RESERVED
          ".data1 3C 3F 78 6D 6C 20 76 65 72 73 69 6F 6E 3D 22 31 "+cr+_   '.data1   RAWDATA OF RESOURCE
          ".data1 2E 30 22 20 65 6E 63 6F 64 69 6E 67 3D 22 55 54 "+cr+_   
          ".data1 46 2D 38 22 20 73 74 61 6E 64 61 6C 6F 6E 65 3D "+cr+_   
          ".data1 22 79 65 73 22 3F 3E 0D 0A 3C 61 73 73 65 6D 62 "+cr+_   
          ".data1 6C 79 20 78 6D 6C 6E 73 3D 22 75 72 6E 3A 73 63 "+cr+_   
          ".data1 68 65 6D 61 73 2D 6D 69 63 72 6F 73 6F 66 74 2D "+cr+_   
          ".data1 63 6F 6D 3A 61 73 6D 2E 76 31 22 20 6D 61 6E 69 "+cr+_   
          ".data1 66 65 73 74 56 65 72 73 69 6F 6E 3D 22 31 2E 30 "+cr+_   
          ".data1 22 3E 0D 0A 09 3C 61 73 73 65 6D 62 6C 79 49 64 "+cr+_   
          ".data1 65 6E 74 69 74 79 0D 0A 09 09 76 65 72 73 69 6F "+cr+_   
          ".data1 6E 3D 22 31 2E 30 2E 30 2E 30 22 0D 0A 09 09 70 "+cr+_   
          ".data1 72 6F 63 65 73 73 6F 72 41 72 63 68 69 74 65 63 "+cr+_   
          ".data1 74 75 72 65 3D 22 58 38 36 22 0D 0A 09 09 6E 61 "+cr+_   
          ".data1 6D 65 3D 22 43 6F 6D 70 61 6E 79 4E 61 6D 65 2E "+cr+_   
          ".data1 50 72 6F 64 75 63 74 4E 61 6D 65 2E 59 6F 75 72 "+cr+_   
          ".data1 41 70 70 22 0D 0A 09 09 74 79 70 65 3D 22 77 69 "+cr+_   
          ".data1 6E 33 32 22 0D 0A 09 2F 3E 0D 0A 09 3C 64 65 73 "+cr+_   
          ".data1 63 72 69 70 74 69 6F 6E 3E 0D 0A 09 09 59 6F 75 "+cr+_   
          ".data1 72 20 61 70 70 6C 69 63 61 74 69 6F 6E 20 64 65 "+cr+_   
          ".data1 73 63 72 69 70 74 69 6F 6E 20 68 65 72 65 2E 0D "+cr+_   
          ".data1 0A 09 3C 2F 64 65 73 63 72 69 70 74 69 6F 6E 3E "+cr+_   
          ".data1 0D 0A 09 3C 64 65 70 65 6E 64 65 6E 63 79 3E 0D "+cr+_   
          ".data1 0A 09 09 3C 64 65 70 65 6E 64 65 6E 74 41 73 73 "+cr+_   
          ".data1 65 6D 62 6C 79 3E 0D 0A 09 09 09 3C 61 73 73 65 "+cr+_   
          ".data1 6D 62 6C 79 49 64 65 6E 74 69 74 79 0D 0A 09 09 "+cr+_   
          ".data1 09 09 74 79 70 65 3D 22 77 69 6E 33 32 22 0D 0A "+cr+_   
          ".data1 09 09 09 09 6E 61 6D 65 3D 22 4D 69 63 72 6F 73 "+cr+_   
          ".data1 6F 66 74 2E 57 69 6E 64 6F 77 73 2E 43 6F 6D 6D "+cr+_   
          ".data1 6F 6E 2D 43 6F 6E 74 72 6F 6C 73 22 0D 0A 09 09 "+cr+_   
          ".data1 09 09 76 65 72 73 69 6F 6E 3D 22 36 2E 30 2E 30 "+cr+_   
          ".data1 2E 30 22 0D 0A 09 09 09 09 70 72 6F 63 65 73 73 "+cr+_   
          ".data1 6F 72 41 72 63 68 69 74 65 63 74 75 72 65 3D 22 "+cr+_   
          ".data1 58 38 36 22 0D 0A 09 09 09 09 70 75 62 6C 69 63 "+cr+_   
          ".data1 4B 65 79 54 6F 6B 65 6E 3D 22 36 35 39 35 62 36 "+cr+_   
          ".data1 34 31 34 34 63 63 66 31 64 66 22 0D 0A 09 09 09 "+cr+_   
          ".data1 09 6C 61 6E 67 75 61 67 65 3D 22 2A 22 0D 0A 09 "+cr+_   
          ".data1 09 09 2F 3E 0D 0A 09 09 3C 2F 64 65 70 65 6E 64 "+cr+_   
          ".data1 65 6E 74 41 73 73 65 6D 62 6C 79 3E 0D 0A 09 3C "+cr+_   
          ".data1 2F 64 65 70 65 6E 64 65 6E 63 79 3E 0D 0A 3C 2F "+cr+_   
          ".data1 61 73 73 65 6D 62 6C 79 3E 20  "+cr+_   
          "/+200"+cr+"01 `end_of_resources` 01"+cr+"/+1000"+cr 'PADD TO NEAREST 512 BYTES
       
        rsrf=1
    #endif
     

[Zlatko Vid]

Here the code for a 64 bit application:

Code Select Expand

    #if 1
        'TEST STUB FOR MANIFEST ( FOR WINDOWS 64 BIT )
        '   
        w5=".resources"+cr+_
          "hl0 hl0 hl1 hw0 hw1"+cr+_               '00 MAIN DIRECTORY  CHARACTERISTICS DATETIMESTAMP MAJORMINORVERSION NUMOFNAMES NUMOFIDS
          "hl18 hl80000018"+cr+_                   '10   ENTRY RT_MANIFEST
          "hl0 hl0 hl1 hw0 hw1"+cr+_               '18   MANIFEST DIRECTORY
          "hl1 hl80000030"+cr+_                    '28     ID 1 STRINGS
          "hl0 hl0 hl1 hw0 hw1"+cr+_               '30     ID1 LANGUAGE DIRECTORY MANIFEST
          "nl0 hl48"+cr+_                          '40       ID1L MANIFEST ENGLISH
          "ga data1 nl551 nl0 hl0"+cr+_            '48       DATA ENTRY: ADDRESS LENGTH CODEPAGE RESERVED
          ".data1 `<?xml version=` 22 `1.0` 22 ` encoding=` 22 `UTF-8` 22 ` standalone=` 22 `yes` 22 `?>` "+cr+_      '.data1   RAWDATA OF RESOURCE
          ".data1 `<assembly xmlns=` 22 `urn:schemas-microsoft-com:asm.v1` 22 ` manifestVersion=` 22 `1.0` 22 `>` "+cr+_
          ".data1 `<assemblyIdentity` "+cr+_
          ".data1 ` version=` 22 `1.0.0.0` 22 "+cr+_
          ".data1 ` processorArchitecture=` 22 `amd64` 22 "+cr+_
          ".data1 ` name=` 22 `CompanyName.ProductName.YourApp` 22 "+cr+_
          ".data1 ` type=` 22 `win32` 22 "+cr+_
          ".data1 `/>` "+cr+_
          ".data1 `<description>` "+cr+_
          ".data1 `Your application description here.` "+cr+_
          ".data1 `</description>` "+cr+_
          ".data1 `<dependency>` "+cr+_
          ".data1 `<dependentAssembly>` "+cr+_
          ".data1 `<assemblyIdentity` "+cr+_
          ".data1 ` type=` 22 `win32` 22 "+cr+_
          ".data1 ` name=` 22 `Microsoft.Windows.Common-Controls` 22 "+cr+_
          ".data1 ` version=` 22 `6.0.0.0` 22 "+cr+_
          ".data1 ` processorArchitecture=` 22 `amd64` 22 "+cr+_
          ".data1 ` publicKeyToken=` 22 `6595b64144ccf1df` 22 "+cr+_
          ".data1 ` language=` 22 `*` 22 "+cr+_
          ".data1 `/>` "+cr+_
          ".data1 `</dependentAssembly>` "+cr+_
          ".data1 `</dependency>` "+cr+_
          ".data1 `</assembly>` "+cr+_
          "/+200"+cr+"01 `end_of_resources` 01"+cr+"/+1000"+cr 'PADD TO NEAREST 512 BYTES
       
        rsrf=1
    #endif
     

Logged


[Charles Pegge]

All things are possible, Aurel, but this would be a rather restrictive hack, so I think the regular RES file route for manifests would be preferable.