Delphi Program To ActiveX (Delphi Source Code Included)

I want an activex component which useable in internet explorer to read and write usb touchless mifare cards. Example source code (in delphi) included. ActiveX must implements all of the functions of example code. ActiveX must be used with visual basic, vbscript and other activex supporting languages. Delphi 7.0 Source Code: <[login to view URL]>