التعامل مع الخطاء في text
|
التعامل مع الخطاء في text
|
21-02-2016, 01:26 AM
السلام عليكم ورحمة الله وبركاتة
  كيف حالكم اعضاء دلفي العرب كيفة التعامل مع Abort; مثال التحقق ان عثر على خطاء if Abort بدال ما يضهر لي الخطاء ويتشنج البرنامج يضهر لي الخطاء في Memo مع عمل توقف للبرنامج وبس 
21-02-2016, 02:07 PM
وعليكم السلام
ما نوع الخطأ او الاستثناء الذي حدث ؟
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
21-02-2016, 09:37 PM
404 غير موجود
ما الكود الذي كتبته وما الرابط ؟
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
21-02-2016, 09:43 PM
(آخر تعديل لهذه المشاركة: 21-02-2016, 09:44 PM بواسطة صعب الوصايف.)
Memo1.Lines.Add(idhttp.Get('https://www.instagram.com/'+edit1.Text+'/'))
idhttp := Tidhttp.Create(nil); idhttp.Request.Accept := 'text/html, */*'; idhttp.Request.UserAgent := 'User-Agent=Mozilla/5.0 (Windows NT 6.1; WOW64; rv:44.0) Gecko/20100101 Firefox/44.0)'; idhttp.Request.ContentType := 'Content-Type=application/x-www-form-urlencoded; charset=UTF-8'; idhttp.HandleRedirects := True; Memo1.Lines.Add(idhttp.Get('https://www.instagram.com/'+edit1.Text+'/'));
22-02-2016, 10:34 AM
الكود ناقص! ماذا عن SSL بما ان الرابط https
انصحك بقراءة كتاب Indy In Depth
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
22-02-2016, 10:56 AM
اخي تمام ssl ..
لاكن هذا المشكلة لم اجد لها حل فققرت ان اخليه الخطا لايضهر فقط يطبع الخطا داخل memo بدل من عرض الخطا برسالة مزعجه
22-02-2016, 11:20 AM
(آخر تعديل لهذه المشاركة: 22-02-2016, 11:22 AM بواسطة محمد عبد العزيز.)
عامة عندما تشك في تنفيذ امر ما استخدم/ضع بين try except
في حالتك الامر هو Get لidhttp بدلا من الاستخدام المباشر كود : Memo1.Lines.Add(idhttp.Get('https://www.instagram.com/'+edit1.Text+'/'));كود : Var
HTML:String;
Begin
//..... باقي الكود
Try
HTML := idhttp.Get(https://www.instagram.com/'+edit1.Text+'/');
except
on e: EIdHTTPProtocolException do begin
Memo1.lines.add(e.ErrorMessage);
Memo1.lines.add(idHTTP.response.ResponseText);
end;
end;
Memo1.Lines.Add(HTML);
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
|
|
|
