>Thanks Sergey,
>
>You are really great!
>
>I tried both of your solutions and both wroked fine! Still there is a small thing I have to ask. Both returned for the record number 20:
>C74190B6-8589-11D1-B16A-00C0F0283628 and it really was the treeview CLSID
>but for the record number 21 (imagelist) returned value was:
>0000005C-0000-0000-0100-000000000000 this CLSID didn't exist in the registry.
>
For that control CLSID is at offset 0x900.
lcClsIdBin = SUBSTR(ole, 0x900+1,16)
I dunno what determines CLSID location.
--sb--