إرسال أخطاء النظام

السلام عليكم ورحمة الله وبركاته

قمت بتصميم برنامج وضعت عليه ApplicationEvent وعبرها قمت بتخزين كل الأخطاء(الإستثناءات) غير المحصورة بـ Try Exception في قاعدة البيانات وجعلت شدولة تطلب من المستخدم الدخول للإنترنت مثلا 4 مرات في الاسبوع (If (DayOf(Now)mod 7 =0) then)

على أن يقوم بمجرد دخوله للانترنت بإرسال الأخطاء المخزنة في قاعدة البيانات الى بريدي الإلكتروني مع قليل من بيانات المستخدم او الجهة التي يعمل به النظام بدلاً من السؤال المتكرر عن الاخطاء التي تحدث ولم يتم الإنتباه لهاو التي عادة يتم تداركها في الفترة الاولى من الاستخدام التجريبي للنظام او فترة الضمان.

الســــــــــــــــــــــــــــؤال :

قمت بكتابة هذه السطور ادناها وينتج عنه خطا (Socket Error #11004 ) فأين يكمن الخطأ فإنها اول تجربة لي في برمجة الـIndy

 
      MyMail.Host :='BitakeSoft';
      MyMail.Port := 25;
      try
      MyMail.Connect();
      MyMessage.From.Name := Trim(Edit1.Text);// Set Sender address
      MyMessage.Subject := Trim(Edit3.Text); // Type subejct
      MyMessage.Recipients.EMailAddresses := Trim(Edit2.Text); // Recipient address
      MyMessage.Body.Add(Memo1.Lines.Text); // Some line of data
      MyMail.Send(MyMessage);
      finally
      MyMail.Disconnect;
      end;