How to write SMTP ocx using VCL's SMTP client

Hi

I want to have a SMTP active-x usin VCL's smtp client .
How can I do this ?

Sincerely