delphi4arab منتديات دلفي للعرب

بسم الله الرحمن الرحيم
كيفيه كتابه اوامر بالدوس عن طريق الدلفي ؟
مثال اذا ما أردنا تتفيذ امر
net user delphi4arab /add
لاضافه يوزر جديد في الويندوز كيفيه تطبيق ذلك

السلام عليكم
باستخدام WinExec مثل:

كود :
WinExec('cmd /k ver',SW_SHOW)

او ShellExecute من ShellAPI مثل:

كود :
ShellExecute(0, 'open','cmd',PChar('/k ver'),'',SW_NORMAL);

لهذه الأخيرة أضف ShellAPI في Uses.

بسم الله الرحمن الرحيم

تم تصحيح الخطأ
كان عندي الخطأ

كود :
ShellExecute(0, 'open','cmd',PChar('ver'),'',SW_NORMAL);

لم اكتب k/

كود :
ShellExecute(0, 'open','cmd',PChar('/k ver'),'',SW_NORMAL);

إقتباس :لم اكتب k/

تلك Argument لتطبيق Cmd وتعني تنفيذ أوامر مع إبقاء واجهة Console مفتوحة
ألق نظرة على بقية الـ Arguments أكتب في سطر الأوامر:

كود :
cmd /?

مثال آخر:

كود :
WinExec('cmd /c copy *.exe d:',SW_HIDE)

بالتوفيق.

اذا ارت الحصول على النتائج النصية لتنفيذ أوامر الدوس فما عليك سوى زيارة هذا الموضوع
http://www.delphi4arab.net/forum/showthr...p?tid=2731

php3man

kachwahed

php3man

kachwahed

mourad39