اجرا کردن یک برنامه [بایگانی]

maminb

سه شنبه 27 اسفند 1387, 17:47 عصر

سلام دوستان.

میخواستم بدونم چطور میدونم با Delphi کاری کنم با کلیک روی یه Button، یه برنامه با سوییچ (argument) های مورد نظر خودمون اجرا بشه؟

مثلا، میخوام کاری کنم که با زدن Button، برنامه Shutdown.exe با سوییچ -r اجرا بشه (shutdown.exe -r).

AliReza Vafakhah

سه شنبه 27 اسفند 1387, 19:46 عصر

WinExec('shutdown -f -s -t 20',SW_NORMAL);

پارامتر دوم هم نوع نمایش پنجره باز شده است که با _SW شروع میشه

maminb

سه شنبه 27 اسفند 1387, 20:57 عصر

خیلی خیلی ممنون دوست عزیز!

میشه راهنماییم کنین که چطوری بخشی از اون رو تعیین کنم؟

یعنی مثلا یه تکست باکس داشته باشم که کاربر با وارد کردن زمان بر حسب ثانیه در اون، بتونه تعیین کنه بعد از چند ثانیه عمل مورد نظر انجام بشه. به همچنین یک سری RadioButton هم بذارم که کاربر بتونه با انتخاب یکی از اون ها معین کنه که سیستم Logoff بشه یا Shutdown یا Restart و...

ممنون میشم در این مورد هم راهنماییم کنین!

AliReza Vafakhah

سه شنبه 27 اسفند 1387, 23:24 عصر

خیلی خیلی ممنون دوست عزیز!

میشه راهنماییم کنین که چطوری بخشی از اون رو تعیین کنم؟

یعنی مثلا یه تکست باکس داشته باشم که کاربر با وارد کردن زمان بر حسب ثانیه در اون، بتونه تعیین کنه بعد از چند ثانیه عمل مورد نظر انجام بشه. به همچنین یک سری RadioButton هم بذارم که کاربر بتونه با انتخاب یکی از اون ها معین کنه که سیستم Logoff بشه یا Shutdown یا Restart و...

ممنون میشم در این مورد هم راهنماییم کنین!

از کد زیز می تونید برای دریافت زمان استفاده کنید

WinExec(PChar('shutdown -s -f -t '+Edit1.text),SW_NORMAL);

و یه RadioGroup اتنخاب کنید و به ترتیب Shutdown , Restart ,Logoff رو با آیتم هاش اضافه کنید وسپس از خاصیت RadioGroup1.ItemIndex برای هر فرمان استفاده کنید مثلا:

if(RadioGroup1.ItemIndex=1) then
WinExec(PChar('shutdown -r -f -t '+Edit1.text),SW_NORMAL);

می تونی بهترش کنی و از Case استفاده کنی

موفق باشی