подробнее: заменить классы и функции VCL на соответсвующие аналоги KOL
------------ Дoбавленo:

На всякий случай во избежание недопонимания ситуации: для этой процедуры требуется
- знание Delphi
- знание ActiveX
- знание VCL и KOL