Строковые типы в функциях SetCurrentDirectory и GetCurrentDirectory

[Andersen1313]

Необходимо создать структуру папок S1-S2-S3(папка в папке).. После создания папки S1 надо сделать её текущей и сохранить путь к этой папке в переменную path и уже используя эту переменную создать остальные вложенные папки.. что я делаю не правильно?

void __fastcall TForm1::ToolButton1Click(TObject *Sender)
{
        int result;
        char path[19];
        GetCurrentDirectory(19,path);
        result=CreateDirectory("S1",0); //Создание каталога
        if (!result)
                {
                        ShowMessage("Не возможно создать каталог");
                }
                else
                        {
                                SetCurrentDirectory("S1");
                                GetCurrentDirectory(19,path);
                                CreateDirectory("\\S2",0);
                                CreateDirectory(path+"S2\\S3",0);
                        }
}

[Stilet]

Бульбульдера под рукой нет, но есть два предложения:
1)

	
        system("mkdir d:\\1\\s1\\s2\\s3");
	system("cd /d d:\\1\\s1");

Они в stdlib лежат
2)

void __fastcall TForm1::ToolButton1Click(TObject *Sender)
{
        int result;
        char path[255];
        GetCurrentDirectory(19,path);
        result=ForceDirectory(path+"S1\\S2\\S3",0); //Создание каталога
        if (!result)
                {
                        ShowMessage("Не возможно создать каталог");
                }
                else
                        {
                                SetCurrentDirectory(path+'S1');
                        }
}