چت

سلام
فکر می کنم همه شما برنامه CHAT که در مثال Dephi وجود دارد مشاهده کردید که با client socket ,server socket نوشته شده میخواستم همین برنامه را با IdTCPClient,IdTCPServer ولی یک مشکل داره که IdTCPClient رویدادی برای اینکه بفهمیم پیغام رسیده نداره و اگر هم از readln استفاده بشه تا موقعی که پیغامی نیاد برنامه حالت قفل کردن دارد!
لطف کنید راهنمایی بفرمایید.

من در مورد حالت قفل کردن مبتونم کمکتون کنم تونم اینکه اول از file->new->thread object یه thread درست کن بعد کدهای مربوط به readln رو توی excute procedure بنویس
توی برنامه خودت هم اونجایی که بلوک مربوط به readlnشروع میشه همه اونایی رو که توی thread نوشتی پاک کن جاش این کد رو بنویس

class_name.create(false);

class_name اسم همون کلاسی هست که موقع درست کرن thread object دادی