Delphi.pdf


Aperçu du fichier PDF delphi.pdf - page 5/306

Page 1...3 4 567306


Aperçu texte


Devuelve el directorio actual de una unidad y lo mete en la variable S. El
parámetro D es el número de la unidad siendo:
D
--0
1
2
3
...

Unidad
-----------------Unidad por defecto
A:
B:
C:

Por ejemplo para leer el directorio actual de la unidad C:
var
sDirectorio: String;
begin
GetDir( 3, sDirectorio );
ShowMessage( 'El directorio actual de la unidad C: es ' +
sDirectorio );
end;

function RemoveDir( const Dir: string ): Boolean;
Elimina un directorio en el caso de que este vacío, devolviendo False si no ha
podido hacerlo.
RemoveDir( 'C:\prueba\documentos' ) devuelve True
RemoveDir( 'C:\prueba' )
devuelve True
RemoveDir( 'C:\otraprueba' )
devuelve False porque no esta
vacío

function DirectoryExists( const Directory: string ): Boolean;
Comprueba si existe el directorio indicado por el parámetro Directory. Por
ejemplo:
DirectoryExists( 'C:\Windows\System32\' )
devuelve True
DirectoryExists( 'C:\Windows\MisDocumentos\' ) devuelve False

function DiskFree( Drive: Byte ): Int64;
Devuelve el número de bytes libres de una unidad de dico indicada por la
letra Drive:
Drive
----------0
1
2
3
...

Unidad
-----Unidad por defecto
A:
B:
C:

Por ejemplo vamos a ver el número de bytes libres de la unidad C:
DiskFree( 3 ) devuelve 5579714560