+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : مشكله عند اقلاع client (/showthread.php?tid=254)
مشكله عند اقلاع client - galag8 - 06-06-2008
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله تعالي وبركاته
عندي مشكله في كود برنامج كلاينت
انو لو الكلاينت بدا قبل السيرفر اي ان برنامج السيرفر لم يبدا بعد يكون هناك خطا
انا عاوز الكلاينت لما يبدا وما يلاقي السيرفر يعمل كونكت كل خمس ثواني الي ان يبدا السيرفر
وهذا هو الكود
procedure TForm1.FormCreate(Sender: TObject);
begin
ClientSocket1.Address:=Edit1.Text;
ClientSocket1.Active:=True;
end;
وشكرا
مشكله عند اقلاع client - محمد عبد العزيز - 07-06-2008
يمكنك ان تستخدم الحدث OnError للClientSocket لتفعيل Timer
والTimer يستدعي زر محاولة الاتصال كل 5 ثواني
مثال بسيط مرفق
والسلام عليكم ورحمة الله
مشكله عند اقلاع client - galag8 - 07-06-2008
جزاك الله خيرا كان الله في عونك مادمت في عوننا والى الامام وشكرا