07-05-2010, 02:38 PM
![[صورة: 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)