This is a Microsoft Script Control Control is a case in point. Delphi reference to a version of the source code rewritten to the C++ builder use the controls you can take a look.

Packet : 121114119userscript.rar filelist
UserScript.exe
UserScript.bpr
GlqAutoObjectImpl.h
Main.h
UserScript_ATL.h
UserScript_TLB.h
Main.dfm
GlqAutoObjectImpl.cpp
Main.cpp
UserScript.cpp
UserScript_ATL.cpp
UserScript_TLB.cpp
Main.ddp
UserScript.res
UserScript.tds
UserScript.tlb
ReadMe.txt

• We are an exchange download platform that only provides communication channels. The downloaded content comes from the internet. Except for download issues, please Google on your own.
• The downloaded content is provided for members to upload. If it unintentionally infringes on your copyright, please contact us.
• Please use Winrar for decompression tools
• If download fail, Try it againg or Feedback to us.
• If downloaded content did not match the introduction, Feedback to us，Confirm and will be refund.
• Before downloading, you can inquire through the uploaded person information

Nothing．