Вопрос сводится к:
1) какие функции нужны, в каких библиотеках искать и как библиотеки подключать
2) синтаксис вызова внешней подпрограммы (*.ехе) с параметрами (*.exe, "...params...")
либо ("cmd.exe > ...~params...")
Задача: создать консольную прогу, которая:
Т.З. псевдокодом:
var
v_fname:string;
v_f:TTextFile;
begin
v_fname:=dirList.txt
1) If NOT FileExist (v_fname)
then читает список папок текущей директории
сохраняет в (v_fname)
2) else while not EOF (v_fname) //if fileExist(v_fname)
foreach readLine(v_fname, v_dirName) do
begin if not DirExist(v_dirName) mkdir (v_dirName).
end.
Пробую прописать
uses FileUtils; // - выдает ошибку.
Альтернативно - как вставить в Лазарусе код обращений к cmd ?
Наподобие
FnctCallCMD(v_commandLine:record of strings, v_output ):boolean;
FnctCallCMD(v_commandLine:string ):boolean;
Чтобы потом (копирование списка в файл)
x:record of strings;
FnctCallCMD(v_command, x);
FileWrite(v_fname, x);
или (развертывание списка из файла в папки)
foreach v_fname as record do
If not fileExist( record){
If not FnctCallCMD("mk dir", record){
break;}
}
Ну в крайнем случае, скажите, что на Code:Blocks (C, C++) будет легче
Есть ли в Лазарусе браузер объектов (имена переменных, функций, классов) - чтобы можно было переименовывать без Find/Replace.
С уважением.
