Simple Mifare application in Delphi 7

I require a very simple MIFARE demo application made in Delphi 7 using a I K card that will do the following: ? **Form 1** Enter details for: * Fist name * Surname * DOB (calendar control) * Mobile number Write data to the card in this order * Fist name in sector 1 block 1 * Second name sector 2 block 2 * DOB sector 3 block 3 * Mobile number sector 4 block 4 Global variable for opening sector 1& 2 with KEY A Global variable for opening sector 3 & 4 with KEY A & B **Form 2** Retrieves details from card and displays ? I have the OCX control form [login to view URL] (can be downloaded from the site but if a problem then I can send) The demo app will use this OCX