[Adrenalin666]

Код:

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;

Admin: Не забываем правильно оформлять код!

ошибок нет, но я пишу команду к примеру rundll32 shell32,OpenAs_RunDLL это - Выводит окошко - "Открыть с помощью.."

он должен присваивать к переменной d и
сработать должно так
ShellExecute(0,'open','cmd.exe','/c rundll32 shell32,OpenAs_RunDLL','C:\Windows\system32\',SW_S HOW);

но почемуто не работает в тестировании программы

[eXplorer]

неработает:
выдает ошибку или что?

[eXplorer]

у меня работает... подключи модуль ShellApi если он неподключен...

[Adrenalin666]

в дельфи ошибки нет, сохраняется но я тестирую готовое и не срабатывает

[Adrenalin666]

ShellApi подключен, просто я пишу допустим

rundll32 shell32,OpenAs_RunDLL

он подставить его под d должен и открыть мне, а он неясно почему не открывает если сразу поставить

ShellExecute(0,'open','cmd.exe','/c rundll32 shell32,OpenAs_RunDLL','C:\Windows\system32\',SW_S HOW);

тогда да работает

[eXplorer]

у тебя d стоит вообще Real...
Так он у тебя не запустит...)