المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : كيفيه كتابه اوامر dos بدلفي

php3man
02-03-2010, 12:59 PM
بسم الله الرحمن الرحيم
كيفيه كتابه اوامر بالدوس عن طريق الدلفي
مثال
اذا ما أردنا تتفيذ امر
net user delphi4arab /add
لاضافه يوزر جديد في الويندوز
كيفيه تطبيق ذلك
kachwahed
02-03-2010, 02:21 PM
السلام عليكم
باستخدام WinExec مثل:
WinExec('cmd /k ver',SW_SHOW)
او ShellExecute من ShellAPI مثل:
ShellExecute(0, 'open','cmd',PChar('/k ver'),'',SW_NORMAL);
لهذه الأخيرة أضف ShellAPI في Uses.
php3man
02-03-2010, 11:45 PM
بسم الله الرحمن الرحيم

تم تصحيح الخطأ
كان عندي الخطأ
ShellExecute(0, 'open','cmd',PChar('ver'),'',SW_NORMAL);
لم اكتب k/
ShellExecute(0, 'open','cmd',PChar('/k ver'),'',SW_NORMAL);
kachwahed
03-03-2010, 05:56 AM
لم اكتب k/
تلك Argument لتطبيق Cmd وتعني تنفيذ أوامر مع إبقاء واجهة Console مفتوحة
ألق نظرة على بقية الـ Arguments أكتب في سطر الأوامر:
cmd /?
مثال آخر:
WinExec('cmd /c copy *.exe d:',SW_HIDE)
بالتوفيق.