MKDir y SaveFile

[Alejo15x]

Hola,

tengo un problema

veran, intento guardar 2 archivos,
1 en la carpeta anterior, el segundo archivo en una carpeta seguida del mismo.

Mi codigo và asì.

Código Delphi [-]
l.Lines.SaveToFile(s1.filename+'.npc');

Código Delphi [-]
la.Lines.AddStrings(listavoices.Items);
MKDir(s1.FileName);
l.lines.SaveToFile(s1.FileName);

un saludo