كيفية تشغيل برنامج أخر من خلال برنامجى ؟
كيفية تشغيل برنامج أخر من خلال برنامجى؟
مغلق
uses shellApi; procedure TForm1.Button1Click(Sender: TObject); var PName:array[0..79]of char; begin if OpenDialog1.Execute then begin StrPCopy(PName,OpenDialog1.FileName); ShellExecute(Handle,'open',PName,nil,nil,SW_RESTORE); end; end;
سواء كان ملف او برنامج
أضاعوني وأي فتى أضاعـوا * * * ليـوم كــريهـة وســـداد ثغــــر
وخـــــلونـي ومعتـرك المنايـا * * * وقد شـــرعوا أسنــتهم لنحـري
كأني لم أكــــــن فيهـم وسيطـا * * * ولم تك نســبتي في آل عمــرو
أجرر في الجـــوامع كـل يـوم * * * ألا لله مظــــلمتـي وهـصـــري
عسى الملك المجيب لمن دعاه * * * سينجيني فيعلم كيــف شكـري
فأجـــزي بالكرامـة أهـل ودي * * * وأجزي بالضـغينة أهل ضري
مرحبا
هي طريقة أخرى
WinExec('مسار البرنامج المراد فتحه',WM_SHOWWINDOW) ;
مثال
WinExec('C:\WINDOWS\system32\calc.exe',WM_SHOWWINDOW)تم تعديل هذه المشاركة بواسطة M_Asize في 7 أكتوبر 2005 في 09:56
إننا محكومون بالأمل وما يحدث الآن ليس نهاية العالم
بارك الله فيكما وأذادكما علما
اللهم أغفر لنا ولوالدينا ومعلمينا وأساتذتنا ومشايخنا وكل من له فضل علينا
هذا الموضوع مغلق.