Здравствуйте, Аноним, Вы писали:

А>Да, только где взять ссылку на этот объект?

Вы указатель на этот объект передаете в функцию.

...
var
Unknown: IUnknown;
...
     Unknown := Self;
     OleCheck(OleCreatePropertyFrame(GetActiveWindow, 16, 16,
       nil,
       1, @Unknown, Pages.cElems, Pages.pElems,
       GetSystemDefaultLCID, 0, nil));
...

Потом, как ненужен станет, сделайте Unknown.Release.