Tworzenie folderów o ilości podanej przez użytkownika

0

Witam,
chcę stworzyć program który będzie pytał użytkownika o liczbe folderów które chce wytworzyć no i po wpisaniu stworzy je.
Jak na razie po wielu próbach ten wydawał mi się najbardziej sensowny ale i tak nie działa:

var
	n,b:integer;
	c,a:string;
begin
	writeln('Wpisz ilosc folderow do utworzenia');
	readln(n);

	b:=0;
	c:='C:\Nowy Folder';
repeat
	b:=b+1;
	a:=c,b;
MkDir(a);
	until b=n;
	readln;
end.

Gdzie jest błąd albo jak to zrobić innym sposobem ?

Pozdrawiam

1

1.Co oznacza zapis "a:=c,b;" ?
2.Użyj pętli

for

A dokładniej:

(zamiast REPEAT - UNTIL):
for b := 1 To N Do
 MkDir(IntToStr(B));
0

No właśnie takim sposobem próbowałem ominąć coś w stylu:
MkDir('C:\Nowy folder',b)
który wywalał błąd.
A jest to po to bo gdy jest normalnie Nowy folder bez numerku potem to wywala błąd "exit code = 5" bo już jest folder o takiej nazwie.
Chciałem zrobić, żeby każdy folder miał numerek osobny, żeby ominąć błąd exitcode=5 :)

Z FORem też próbowałem - też nie wyszło.
IntToStr nie znałem.
Ale coś nie potrafie zastosować tego co podałeś. Przy MkDir nie ma nawet ścieżki gdzie ma go tworzyć więc nie ogarniam tego.
Mógłbyś napisać całość z użyciem IntToStr w Twoim rozumowaniu ?

Żeby nie tworzyć nowego tematu:

  1. Dlaczego jak chce zmienić rozmar okienka (FreePascal) np. na 80x50 to wywala błąd "Impossible to set 80x50 mode", zrobie jeszcze raz to samo z tym, że ustawiając 80x43, znowu wywali błąd do 80x43 mode ale już zmieni rozmiar okienka. Niby byłbym zadowolony z tym, że po uruchomieniu napisanego programu lub po ponownym uruchomieniu FP okienko znowu jest małe.
  2. Czasami mam tak, że jak chce otworzyć nowy plik (nowe okno operacyjne) to po prostu się nie da. Otwieram zakładkę File klikam na New i nic się nie tworzy a zakładka File sie chowa. Czemu tak się dzieje ? Pomaga dopiero ponowne uruchomienie FP.
0
for b := 1 To N Do
 if (Not DirectoryExists('C:/Folder numer'+IntToStr(B))) Then // Jeżeli folder ... NIE istnieje, to utwórz takowy.
  MkDir('C:/Folder numer '+IntToStr(B));

'+' nie przecinek !

A cd.IntToStr, to możesz użyć

val

1 użytkowników online, w tym zalogowanych: 0, gości: 1