getdir
(procedimiento)
Lenguaje: Pascal (Versión: Turbo Pascal)
Obtener el directorio actual
Declaración: procedure GetDir(D: Byte; var S: String);
Detalles:
Obtiene el directorio actual en la unidad de disco que se indique.
Devuelve el nombre del directorio en un parámetro por referencia.
La unidad de disco se indica con un número, que puede ser:
0 Unidad actual
1 Unidad A
2 Unidad B
3 Unidad C
No comprueba errores. Si se indica una unidad de disco no válida, devolverá X:, como si estuviera en la raíz de dicha unidad.
Ejemplo:
var
s : String;
begin
GetDir(0,s); { 0 = Disco actual }
Writeln('Unidad y carpeta actual: ', s);
end.
Órdenes relacionadas:
chdir mkdir rmdir
Volver al índice de la referencia o al
apartado de Pascal