CMD скрипт, запустить из memo

[cybernewbie]

Здравствуйте, подскажите можно ли запустить CMD скрипт с самой программы, например с компонента memo? Как если бы запустили его посредством запуска файла .cmd ???
Нужно чтобы весь скрипт считывался с компоненты.

Заранее спасибо за помощь.

[macomics]

Memo1.SaveToFile('temp.cmd');
ShellExecute(Memo1.Handle, 'open', 'cmd.exe', '/k temp.cmd', nil, nil);
DeleteFile('temp.cmd');

Иначе придётся читать строки из Memo и следовать указаниям скрипта по переходу на метки

for i := 0 to Memo1.Lines.Count - 1 do begin
   ShellExecute(Memo1.Handle, 'open', 'cmd.exe', '/k "' + Memo1.Lines[i] + '"', nil, nil);
end;

Только ещё надо будет делать распознавание команд call и goto а из-за них еще if и for

[cybernewbie]

Понятно, изначально хотел применить первый вариант, потом подумал, что может есть лёгкие способы запуска скрипта, минуя взаимодействие с файловой системой..

Спасибо.

[Arigato]

Не слишком ли быстро удалится файл? Я как-то давно делал запуск временного cmd из своей программы, и чтобы удалить файл после его выполнения, просто добавлял в конце cmd-команду, которая удаляла свой же файл. И это прокатывает.

[macomics]

Да удалится быстро, но я преследовал цель показать, что его надо удалить. Как это будет сделано - не важно. Можно просто писать в конце файла 'del "%~f0"'