TCreditCard
Credit Card verification component for Delphi
Introduction
This component can be used in applications where you require to verify
credit card numbers before accepting them. A credit card number is verified based on
it's prefix, length and a checksum algorithm. Supported credit cards are Visa (13
or 16 digit), Discover, MasterCard and American Express. This is the easiest and fastest
way to verify credit card numbers. A single function call will tell you if a number is
valid or not.
CardType
CardType can be ccVisa, ccMasterCard,
ccAmex or ccDiscover depending on the credit card. This
can be set at design time or runtime.
CreditCard1.CardType := ccDiscover;
CardNumber
The credit card number. This can include spaces,
hyphens, slashes or periods. These will automatically be discarded, so your application
can accept the number in any format, even using a standard Edit field. This can be set at
design time or runtime.
CreditCard1.CardNumber := Edit1.Text;
VerifyCard : Boolean;
This is all that is required to verify the card. Call
VerifyCard after you've set the CardType and CardNumber properties. Returns true if the
card is valid, otherwise returns false.
if CreditCard1.VerifyCard = false then ShowMessage('INVALID CARD!') else {accept payment...}
When you register, you will get the source code for TCreditCard.
This will let you use the component with any version of Delphi 1,2 or 3.
Registration of TCreditCard costs US $20.00, which entitles you to full
source code, updates and tech support (via e-mail).
You can register online from http://www.swregnet.com/1415p.htm
Or call Toll free (within the United States)
1-800-WWW2REG (1 800 999-2734) or (805) 288-1827
RegNet #: 1415
(A major credit card is required)
Or you can send a check or money order (US$20 or equivalent) by post:
Mehul Sampat
1092 Colby
Normal, IL 61761
USA
Either way, when your payment is received, you will be sent the latest version of this,
component along with source code, a demo program and other resources, including an
explanation of how the verification is done with various credit cards.
All this will be sent via e-mail, so PLEASE SPECIFY YOUR E-MAIL ADDRESS.
If you want to be sent this software on a diskette, kindly add $2 for US orders, and $5
for international orders to cover postage.
If you have any questions about this component, e-mail the author at:
mnsampa@rs6000.cmp.ilstu.edu
Last modified: October 8, 1997
Copyright (c) 1997, Mehul Sampat