دمج ملف تطبيق بالبرنامج

[nebchadelphi]

السلام عليكم
ما كيفية تحويل ملف تطبيقي EXE الى res
وكيفية تشغيله من خلال برنامجك
وشكرا

[o15s19]

اتبع الخطوات التالية
ببرنامج الدلفي اضغط على Projects في MainMenu و ثم اختار Resouces
ثم ضع الملف الذي تريده exe rar أي شئ
و ليكن مثالنا exe فرضا
و هذا هو الكود

PHP كود :

procedure TForm11.Button1Click(Sender: TObject);
var
       RStream    : TResourceStream ;
begin
 RStream := TResourceStream.Create(Hinstance,'Resource_1',RT_RCDATA) ;
 RStream.SaveToFile('C:\file.exe' );
end; 


مع ملاحظة أن Resource_1 هو اسم الريسورس و ليس اسم الملف و هو الذي يظهره لك الدلفي
و RT_RCDATA هو نوع الريسورس

طبع يمكنك عمل ما تريد RStream تشغيله مثلا أو حفظه كما هو موجود بالكود

و أهلا بك أخي الكريم

[nebchadelphi]

شكرا لك جزيلا وتقبل الله منك الصلاة والصيام

[kachwahed]

ببرنامج الدلفي اضغط على Projects في MainMenu و ثم اختار Resouces

أين هذا؟
لست أجده في Delphi7.

[o15s19]

موجودة في دلفي 2009 و دلفي 2010
و لا أعلم إن كانت موجودة في دلفي 7 لأني لم استعمله

[nebchadelphi]

نعم لاتوجد في دلفي 7

[nebchadelphi]

هنا ملف به شرح طريقة دمج ملف تطبيقي مع برنامج دلفي
بالاضافة الى برنامج مع الكود سورس للتوضيح
**** الرد وكتابة الملاحظات حول البرنامج

[nebchadelphi]

عفوا هذا هو رابط التحميل
http://www.4shared.com/file/131111464/f3...ource.html

[AL-MOB4RM3G]

عفوا هذا هو رابط التحميل
http://www.4shared.com/file/131111464/f3...ource.html

اولا اشكر الآخ o15s19 على المعلومات القيّمة ,,,

ثآنيا,, رفعت الملف الذي قام الأخ nebchadelphi بارك الله فيه بوضعه الى المنتدى حفآظا عليه من الضيآع,,

+ الملف هو بالغة العربية :laugh:

بارك الله فيكم جميعا,,

[nebchadelphi]

شكرا لك اخ al-mob4rm3g
على حرصك ورفك للبرنامج في المنتدى
لاكن هناك مشكلة في البرنامج وهو ان ال AVIRA لا يقبل بالبرنامج ويصنفه فايروس
ويظهر لك التالي dr/delphi.reg نوع الفايروس
هل لديك أي فكرة حول هذا وشكرا