استدعاء المتصفح لفتح موقع

[الحويطي]

أتيتكم اليوم بموضوع بسيط ومهم وقد تحتاجه يوما ما في تطبيقك ألا وهو فتح صفحات الإنترنت من خلال تطبيقك ( هنــا نحن لا نصمم متصفح انترنت بل تكتب اسم الموقع وراح يفتح من خلال المتصفح الموجود لديك سواء الـ IE أو FireFox أو الـ Opera ....

والآن مع الشرح ....

أولا نفتح الدلفي ونبدأ مشروع جديد .... ونضيف عليه Edit & Button

ويكون شكل الفورم هكذا ...

نضغط DblClk على الـ Button1 ونضيف هذه التعليمة

كود :

ShellExecute(Handle,'open',PChar(Edit1.Text),nil,nil,SW_SHOW);

فتصبح بهذا الشكل

[mobile]

بارك الله فيك

[nabilsoft]

اه طريقة رائعة بوركت اخي