+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : دروس دلفي للمبتدئين (https://delphi4arab.net/forum/forumdisplay.php?fid=13)
+--- الموضوع : استدعاء المتصفح لفتح موقع (/showthread.php?tid=1985)
استدعاء المتصفح لفتح موقع - الحويطي - 07-05-2010
![[صورة: 0x4x_68886451.gif]](http://up.0x4x.com/mypic.php/0x4x_68886451.gif)
أتيتكم اليوم بموضوع بسيط ومهم وقد تحتاجه يوما ما في تطبيقك ألا وهو فتح صفحات الإنترنت من خلال تطبيقك ( هنــا نحن لا نصمم متصفح انترنت بل تكتب اسم الموقع وراح يفتح من خلال المتصفح الموجود لديك سواء الـ IE أو FireFox أو الـ Opera ....
والآن مع الشرح ....
أولا نفتح الدلفي ونبدأ مشروع جديد .... ونضيف عليه Edit & Button
![[صورة: newnyw.jpg]](http://img199.imageshack.us/img199/7247/newnyw.jpg)
ويكون شكل الفورم هكذا ...
![[صورة: insertr.jpg]](http://img265.imageshack.us/img265/7006/insertr.jpg)
نضغط DblClk على الـ Button1 ونضيف هذه التعليمة
كود :
ShellExecute(Handle,'open',PChar(Edit1.Text),nil,nil,SW_SHOW);فتصبح بهذا الشكل
![[صورة: codep.jpg]](http://img693.imageshack.us/img693/5025/codep.jpg)
![[صورة: 0x4x_76641886.gif]](http://up.0x4x.com/mypic.php/0x4x_76641886.gif)
استدعاء المتصفح لفتح موقع - mobile - 07-05-2010
بارك الله فيك
استدعاء المتصفح لفتح موقع - nabilsoft - 02-06-2010
اه طريقة رائعة بوركت اخي