Jak wyslac zawartosc listbox or richedit...?

Jak wyslac zawartosc listbox or richedit przez zwyklego socketa przy delphi (standartowego) z serva do clienta i na odwrot?

nie wiem czy o to chodzi...

var
S: String;
begin
S:= RichEdit1.Text;
ListBox1.Items.DelimitedText:= S;
end;

przypisz zawartosc RichEdit1 do zmiennej S (S:= RichEdit1.Text; )

wyslij zawartosc zmiennej S (z np. klienta do serwera) za pomoca komponentu socket (ClientSocket1.Socket.SendText(S); )

na serwerze odbierz zawartosc S (S:= ServerSocket1.Socket.ReceiveText; )

przypisz do komponentu ListBox (ListBox1.Items.DelimitedText:= S; )

mam nadzieje ze potrafisz nawiazac polaczenie pomiedzy socketami?
to chyba wsio. nie powinienes miec problemu ze zrozumieniem...

no po prostu
server.socket.sendtext(listbox1.items);
albo
server.socket.sendtext(Richedit1.lines.text);

server.socket.sendtext(listbox1.items);

server.socket.sendtext(listbox1.items<font color="red">.text</span>);

dla ścisłości.