Могу ли я создать пакетный файл с помощью паскаля?

Используя паскаль, могу ли я создать текст, а затем сохранить его как файл .bat? Пример:

Program Program_;
uses dos;
var ......
begin
assign(TEXT,'TEXT.txt');
rewrite(TEXT);
writeln(TEXT,' **Enter here all commands of the .bat file that I want create** ');
close(TEXT);

а затем сохранить файл TEXT.bat, который я еще создал, как файл .bat? Пример:

Create(FILEBAT.bat);                     ] I know those commands are absurd I invet 
FILEBAT:= 'TEXT'    ;                    ] them right now.
end.

Как мне это сделать ?????


person VinceLomba    schedule 13.11.2014    source источник
comment
Просто используйте assign(TEXT,'TEXT.BAT') и напишите все команды. Нет необходимости копировать/преобразовывать файл TXT в файл BAT.   -  person gammatester    schedule 13.11.2014
comment
Работает, ты прав!!!! Спасибо !!!   -  person VinceLomba    schedule 13.11.2014


Ответы (1)


Ответ прост, потому что вы можете создавать пакетные файлы только с помощью текстового редактора. Итак, что вам нужно сделать, это создать файл с расширением .bat. Затем вы должны написать свой код в этом файле.

Например:

program MakeBatchFiles;
var
   batchfile : text;
begin
   Assign(batchfile, 'mybatchfile.bat'); rewrite(batchfile);
   write(batchfile, 'echo This is a batch file.');
   close(batchfile);
end.

Просто создайте текстовый файл с расширением .bat, как вы обычно делаете, если создаете его с помощью текстового редактора.

person Konstantinos Kamaropoulos    schedule 14.11.2014