VB Decompiler

_aLfa_ · Posted: Fri Aug 27, 2004 12:30 am Post subject: Component

Parents:
VB Header

[vb:16ehtr6j]

Type Component
  lStructSize    As Long ' 0x00 (00d) Actual size of this structure
  oGuids         As Long ' 0x04 (04d) Offset to this object GUIDs
  lUnknown1      As Long ' 0x08 (08d)
  lUnknown2      As Long ' 0x0C (12d)
  lUnknown3      As Long ' 0x10 (16d)
  lUnknown4      As Long ' 0x14 (20d)
  lUnknown5      As Long ' 0x18 (24d)
  ouExtraInfo    As Long ' 0x1C (28d) Offset to some extra information (unicode)
  lExtraInfoSize As Long ' 0x20 (32d) Size of the previous information
  lNull1         As Long ' 0x24 (36d)
  ontsFileName   As Long ' 0x28 (40d) Offset to File Name
  ontsProgID     As Long ' 0x2C (44d) Offset to Programmatic ID
  ontsName       As Long ' 0x30 (48d) Offset to Name
                         ' 0x34 (52d) <- Structure Size
End Type

[/vb:16ehtr6j]

Notes:
* oGuids points to an array of GUIDs. I believe that the total size of this array is fixed and has 9 GUIDs: the first GUID is the ObjectCLSID, the second one is the EventsIID, the third is the DefaultIID and I don't know what the other 6 are or if they are GUIDs.
* ouExtraInfo is the offset to an Unicode string that usually is a GUID, copyright information or some garbage. The string that you find at this offset has lExtraInfoSize bytes.

VB-Monkey · New User Joined: 05 Aug 2006 Posts: 1

[:37u84syz]If lUUIDSize = -1 then there is no oUUID
If lUUIDSize = 72 then read a unicode UUID [/:37u84syz]

? lUUIDSize = 46 and now?

i have find this string at Offset .oUUID: qhj ZtuQha;jdfn[
What is it?

is the same for every "comctl32.ocx"

Greetings from Germany
VB-Monkey

_aLfa_ · Posted: Sat Mar 08, 2008 7:01 pm Post subject: Re: Component

I have just updated this structure info. Please double check if you wish (;

VB-Monkey I'm sorry for the very late reply, and just in case that you are still arround, I've changed those field names to ouExtraInfo and lExtraInfoSize. Check the structure notes for more information.
_________________
One thing only I know, and that is that I know nothing. (Socrates)