Hi all. I have another problem. Basically I have a project where I need to create a number of folders in one go. This is the code I have:
program create_folders;
uses
crt, sysutils
var
value, name : string;
i : integer;
begin
for i := 1 to 10 do
begin
value := inttostr(i)
name := ('C:\Test\' + value);
CreateDir(name);
end;
end.
However it doesn't work.
What am I doing wrong?
Thanks for your time
Greg :)