Delphi Server ve Client Socket chat

[aslangeri]

s.a.
servera mesaj atarken mesajın başına birkaç bilgi ekle.(clientların adları veya id leri gibi)
yani client gönder butonuna bastığı zaman mesajın başına bir kaç karakter ekleyim mesajı değiştir.
şöyleki
ahmet kullanıcısı mehmet kullanıcısına mesaj ("naber nasılsın?") göndermek istiyor diyelim.
ahmet ekrana naber nasılsın yazıp gönder deyince sen mesajın önüne
" #ahmet#mehmet#" stringini ekle.(yani client ın servera göndereceği mesaj "#ahmet#mehmet#naber nasılsın?" olsun)
server mesaj geldiği zaman mesajdaki bu ifadeleri kontrol edip mehmete bu mesajı göndersin.
mehmetin ekranında da gelen mesajı direk yazmaz sadece ilgili kısmı gösterirsin.
bu tarz bi işlem yapabilirsin.
kolay gelsn.

[aslangeri]

bilgim yok denemek lazım.

[LifeTime]

Delphi 6 veya Delphi 7'nin Enterprise sürümünde, "Borland\Delphi 6\Demos\internet\netchat" diye bir klasör var. Eğer bulabilirsen, Bunun içinde sorunun cevabı, çalışan bir örnekle birlikte mevcut.