Hilfe bin neuling und möchte nen 2p2 chat

[wodkadoctors]

Hallo ich habe fast keine ahnung von Delphi und möchte gerne einen p2p chat basteln wie kann ich das machen folgendes hab ich schon fertig:

procedure TForm1.B_ServClick(Sender: TObject);
begin

end;

end.

und

procedure TForm1.B_SendClick(Sender: TObject);
begin

end;

end.

mit dem ersten möchte ich den entfang für daten starten

und mit dem zweiten möchte ich an die eingegebene ip adresse daten senden.

Frage wie läuft das jetzt mit den sockets?
Zu mir: Kann bisher nur rechnen mit delphi