|
#1
|
|||
|
|||
ShellExecute
Код:
d: real; begin d:=strTOfloat(copy(mess,1,length(mess))); ShellExecute(0,'open','cmd.exe','/c d','C:\Windows\system32\',SW_SHOW); result:=Pchar(' Выполненно! '); exit; end; end; ошибок нет, но я пишу команду к примеру rundll32 shell32,OpenAs_RunDLL это - Выводит окошко - "Открыть с помощью.." он должен присваивать к переменной d и сработать должно так ShellExecute(0,'open','cmd.exe','/c rundll32 shell32,OpenAs_RunDLL','C:\Windows\system32\',SW_S HOW); но почемуто не работает в тестировании программы Последний раз редактировалось Admin, 21.09.2010 в 13:48. |