crear carpetas en android

[amorones]

Gracias Neftalí, revisare la ayuda y el link que me pasaste, si me queda alguna duda, podría volver a preguntar?

Un saludo...

[Casimiro Notevi]

Empezado por amorones

... si me queda alguna duda, podría volver a preguntar?

Claro, sigue preguntando aquí mismo si no lo solucionas.

[amorones]

Listo, muchas gracias por tu ayuda Neftalí, ya pude solucionar el problema, adjunto el código que me funciono por si a alguien mas le sirve:

Código Delphi [-]
 if forcedirectories(P) then
                 ShowMessage('Nuevo directorio creado') else
                 ShowMessage('Fallo al crear directorio nuevo, error : '+ IntToStr(GetLastError));

[amorones]

Una disculpa, este es el código completo:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
Var
  P: String;
  Sr : TSearchRec;
begin
  P := '/storage/sdcard0/Prueba/';
      if forcedirectories(P) then
     ShowMessage('Se creo la carpeta "Partituras"') else
     ShowMessage('Fallo al crear directorio nuevo, error : '+ IntToStr(GetLastError));
end;