برنامج bat to exe مفتوح المصدر

[onexite]

التعديلات على الاصدار القديم

• اضافة ضغط ب upx
  
• اضافة تغيير الايقونة
  
• اضافة العمل بالوضع المتخفي
  
• الاستغناء عن الرسوس
  

الاعدادات

الواجهة الاساسية


بعض البرامج المستخدمة
http://www.delphi4arab.net/forum/showthr...p?tid=7837
madshi.net
التنزيل

كود :

http://www.mediafire.com/?jrbzbi0u5l09f7a

[onexite]

الاضافات

• حذف المخلفات
  
• حذف نفسه
  

PHP كود :

var data:string;
begin
dlgSave1.FileName:='_onexit.exe';
 data:='';
if  not dlgSave1.Execute then exit;
if not stub_Savefile(PAnsiChar(dlgSave1.FileName)) then Exit;
  data:= SynMemo1.Text;

  
if chk3.Checked then
data:=data+#13#10+'del '+ExtractFileName(dlgSave1.FileName);
if chk4.Checked then
data:=data+#13#10+'del %temp%\_exe.bat';


  if addstrings(data,'_BAT',dlgSave1.FileName) then
 stat1.Panels[0].Text:='compile ok...'
 else
 stat1.Panels[0].Text:='compile error...';

 //---------------  icon changer -------------------
 if FileExists(edt1.Text) then
 UpdateExeIcon(PChar(dlgSave1.FileName), '128', PChar(edt1.Text));
 

   //-------- ghost application --------------------
if chk2.Checked then
addstrings('0','_HIDE',dlgSave1.FileName)
else
addstrings('1','_HIDE',dlgSave1.FileName) ;


 //-------- upx executable packer  -----------------
 if chk1.Checked then  begin
 if upx_Savefile(PAnsiChar(_temp+'_upx'))then
  winexec(pchar(_temp+'_upx -9 '+'"'+dlgSave1.FileName+'"'),1) ;
  end; 


[onexite]

الاضافات الجديدة
* اضافة تشغيل كمسؤول
صور من البرنامج

اعدادات

رابط التحميل بأول مشاركة

[MRS_FPS]

السلام عليكم
أخي onexite مااسم المكون الذي وضعته بدلا من Memo
مع لمحة بسيطة عن المكون
و جزاك الله خيرا و السلام عليكم

[onexite]

السلام عليكم
الاضافات الجديدة

• دمج الملفات
  
• شكل جديد
  
• اضافات اخرى .
  

.
واجهة البرنامج

دمج البرامج

اعدادات

عند تنفيذ البرنامج

التحميل

كود :

http://www.mediafire.com/?wycmz6kmom74qng

[onexite]

الاضافات الجديدة
تغيير طريقة تحويل البرامج الى string
تشفير الملفات وفكها في الاستخراج
تقليل الحجم اصبح 22 غ هههههه مع الضغط



التحميل

كود :

http://www.mediafire.com/?i3cn6pvaaazerps

[محمد عبد العزيز]

تقليل الحجم اصبح 22 غ هههههه مع الضغط

يمكنك جعله اصغر...فكر

[onexite]

يمكنك جعله اصغر...فكر

لا اعرف كيف !!

[onexite]

الاصدار الجديد
الاضافات
*اضافة برقراس بار
*اضافة تشفير من نوع ثاني
*اضافة لوج
*اضافات اخرى
التحميل

كود :

http://www.mediafire.com/?3auuag24nab181b

[محمد عبد العزيز]

لا اعرف كيف !!

استخدم بدائل للVCL لديك على خيارات كثيرة منها
- استخدم API فقط
- استخدم Kol / MCK
- استخدم LVCL
راجع الرد 9و10 بهذا الموضوع
http://www.delphi4arab.net/forum/showthr...p?tid=2396
+ هناك بعض المواضيع متعلقة مثل
http://www.delphi4arab.net/forum/showthr...p?tid=3167