How to make code to receive data counting via RS232 with Delphi?

Question

I would like to make a simple device to communicate to my computer via RS232 using Delphi 7. That circuit is just simple, a button with the 220 oh resistor, 0.1uF capacitor, +5V