delphi4arab منتديات دلفي للعرب

نسخة كاملة : كيف أنفذ برنامج اخر في نافذة برنامجي؟
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
هل ممكن تشغيل برنامج اخر في برنامجي؟

مثلا لو افتح برنامج الاله الحاسبه من برنامجي عن طريق الضغط على زر
نكتب هذا الكود
كود :
WinExec('C:\Windows\Calc.exe' ,Sw_Show) ;

لكن كيف انفذ برنامج الاله الحاسبه في في نافذة(الفورم) لبرنامجي
بحيث اكون قادر على العمل فيه من داخل برنامجي في نفس النافذه
السلام عليكم ورحمة الله وبركاته
strongwilled أهلا ومرحبا بك في المنتدى
نأمل أن تكون قد اطعلت على القوانين:
http://www.delphi4arab.net/forum/misc.php?do=showrules

مبدئيا يمكنك استخدام المكون TOleContainer. مرفق مع معظم إصدارات دلفي
بالزر الأيمن عليه اختر Add Object ثم اختر الملف...
أو شيء مثل:
كود :
OleContainer1.CreateObjectFromFile('c:\WINDOWS\system32\calc.exe', True);
لكن...
إذا أوضحت الذي تريد القيام به، قد نجد حلا أفضل.
بالتوفيق.
السلام عليكم
- Handle مقبض واجهة البرنامج الأساسية .
- TrgWindow إسم الواجهة الأب التي نريد أن ينفذ برنامجنا في حدود إطارها !
كود :
SetParent(Handle,FindWindow(Pchar(TrgWindow),Nil));

بالتوفيق,,
إقتباس :- Handle مقبض واجهة البرنامج الأساسية .
- TrgWindow إسم الواجهة الأب التي نريد أن ينفذ برنامجنا في حدود إطارها !
بطريقة أخرى:
PHP كود :
procedure TForm1.FormCreate(Sender: TObject);
begin
  
if WinExec('c:\windows\system32\calc.exe', SW_NORMAL) > 31 then
    Windows
.SetParent(FindWindow('SciCalc', nil), Handle)
end; 
شكرا أخي الكريم kachwahed على التنبيه وان شاء الله أكون حريصا في المرات القادمة
احب أوضح شي أنا مبتدءا في البرمجة
في الحقيقة لا املك معلومات كثيرة عن Handle و TOleContainer

امثال بالصورة التالية
[صورة: images-5235d6ecc1.jpg]