مشاهدة النسخة كاملة : ساااااااااااااعدوني
السوفي محمد
2016-10-08, 17:42
سلااااااام عليكم اخوتي ممكن مسااااعدة كيف اعمل مشروعين الدلفي في مشروووع
اي واجهتين في نفس المشروووووووع
طيباوي ابو علي1
2016-10-09, 11:40
هذا حسب ما فهت من سؤال :
مشروعين الدلفي في مشروع
اذا كان هناك خطأ وضح أكثر
هذا المشروع الاول
فتح أي برنامج أو مجلد بـدلفي
// استدعاء الوحدة الخاصة بهذه الدوال التي سوف نستعملها فيما بعد أو لاحقا
uses
****lApi;
procedure TForm1.Button1Click(Sender: TObject);
begin
// فتح مشروع ثاني
****lExecute(Handle, 'open', 'اسم المشروع الثالني', nil, nil, SW_SHOW);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
// فتح المشروع الثالث
****lExecute(Handle, 'open', 'اسم المشروع الثالث', nil, nil, SW_SHOW);
end;
طيباوي ابو علي1
2016-10-09, 11:43
هذا حسب ما فهت من سؤال :
مشروعين الدلفي في مشروع
اذا كان هناك خطأ وضح أكثر
هذا المشروع الاول
فتح أي برنامج أو مجلد بـدلفي
// استدعاء الوحدة الخاصة بهذه الدوال التي سوف نستعملها فيما بعد أو لاحقا
// انزع الفراغات
uses
S h e l lApi;
procedure TForm1.Button1Click(Sender: TObject);
begin
// فتح مشروع ثاني
S h e llExecute(Handle, 'open', 'اسم المشروع الثالني', nil, nil, SW_SHOW);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
// فتح المشروع الثالث
S h e l lExecute(Handle, 'open', 'اسم المشروع الثالث', nil, nil, SW_SHOW);
end;
vBulletin® v3.8.10 Release Candidate 2, Copyright ©2000-2024, TranZ by Almuhajir