كيف اشغل ملف من الروسيس بشكل مباشر

[Sonic]

السلام عليكم
كيف اقوم بتشغيل ملف من الروسيس بشكل مباشر بدون حفظه في مجلد وفتحه

[Agmcz]

وعليكم السلام
ماذا ستفعل بالضبط؟

[Sonic]

هذا الكود التشغيل مقطع صوتي

PlaySound(PChar('MonSon'), HInstance, SND_ASYNC or SND_RESOURCE);

تشغيل ملف تنفيذي الموجود الداخل RESOURCE بشكل مباشر من الRESOURCE

[onexite]

وعليكم السلام
اذا كان ملف صوتي او صورة او ... فاستخدم ميموري ستريم
واذا كان ملف تطبيقي فاستخدم shellcode

[Sonic]

كود :

var Res:TResourceStream; begin Res:=TResourceStream.Create(hInstance,'2.rc',RT_RCDATA); try ShellExecute(0,'open','test.exe',nil,nil,SW_SHOWNORMAL); finaly Res.Free; end; end;

انا استخدم دلفي xe اضفت الملف الملف الى Resource اسمه text.exe وكتبت الكود لم ينجح تشغيل بشكل مباشر في الذاكرة بدون استخراجه الى اي قرص

[onexite]

كود :

var Res:TResourceStream; begin Res:=TResourceStream.Create(hInstance,'2.rc',RT_RCDATA); try ShellExecute(0,'open','test.exe',nil,nil,SW_SHOWNORMAL); finaly Res.Free; end; end;

انا استخدم دلفي xe اضفت الملف الملف الى Resource اسمه text.exe وكتبت الكود لم ينجح تشغيل بشكل مباشر في الذاكرة بدون استخراجه الى اي قرص

انت لم تقم باستخراج الرسورس

PHP كود :

Res.SavetoFile('test.exe'); 


واذا اردت التشغيل المباشر
http://www.delphi4arab.net/forum/showpos...ostcount=6