11-06-2015, 05:57 PM
11-06-2015, 11:56 PM
وعليكم السلام
ماذا ستفعل بالضبط؟
ماذا ستفعل بالضبط؟
12-06-2015, 12:49 AM
هذا الكود التشغيل مقطع صوتي
PlaySound(PChar('MonSon'), HInstance, SND_ASYNC or SND_RESOURCE);
تشغيل ملف تنفيذي الموجود الداخل RESOURCE بشكل مباشر من الRESOURCE
PlaySound(PChar('MonSon'), HInstance, SND_ASYNC or SND_RESOURCE);
تشغيل ملف تنفيذي الموجود الداخل RESOURCE بشكل مباشر من الRESOURCE
12-06-2015, 01:44 AM
وعليكم السلام
اذا كان ملف صوتي او صورة او ... فاستخدم ميموري ستريم
واذا كان ملف تطبيقي فاستخدم shellcode
اذا كان ملف صوتي او صورة او ... فاستخدم ميموري ستريم
واذا كان ملف تطبيقي فاستخدم shellcode
12-06-2015, 05:12 AM
كود :
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 وكتبت الكود لم ينجح تشغيل بشكل مباشر في الذاكرة بدون استخراجه الى اي قرص
12-06-2015, 10:32 AM
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 وكتبت الكود لم ينجح تشغيل بشكل مباشر في الذاكرة بدون استخراجه الى اي قرص
انت لم تقم باستخراج الرسورس
PHP كود :
Res.SavetoFile('test.exe');
http://www.delphi4arab.net/forum/showpos...ostcount=6