WinAPI. Функции работы с файлами. Часть 3

  Для С/С++

 BOOL GetDiskFreeSpaceEx(
  LPCTSTR lpDirectoryName,                     // Имя диска
  PULARGE_INTEGER lpFreeBytesAvailableToCaller,// Здесь вернут количество доступных байт
  PULARGE_INTEGER lpTotalNumberOfBytes,        // Общее количество байт на диске
  PULARGE_INTEGER lpTotalNumberOfFreeBytes     // Здесь вернут количество свободных байт
 );

  Для Delphi

 function GetDiskFreeSpaceEx(
  lpDirectoryName: PChar;                 // Имя диска
  var lpFreeBytesAvailableToCaller,       // Здесь вернут количество доступных байт
  lpTotalNumberOfBytes;                   // Общее количество байт на диске
  lpTotalNumberOfFreeBytes: PLargeInteger // Здесь вернут количество свободных байт
 ): BOOL; stdcall;

  Для С/С++

   DWORD GetCompressedFileSize(
   LPCTSTR lpFileName,	   // Имя файла
   LPDWORD lpFileSizeHigh // Здесь вернут указатель на размер файла
   );



  Для Delphi

   function GetCompressedFileSize(
    lpFileName: PChar;     // Имя файла
    lpFileSizeHigh: PDWORD // Здесь вернут указатель на размер файла
    ): DWORD; stdcall;

  Для С/С++

   UINT GetDriveType(
    LPCTSTR lpRootPathName // Описатель устройства
   );

  Для Delphi

   function GetDriveType(
     lpRootPathName: PChar // Описатель устройства
    ): UINT; stdcall;

  Для С/С++

  DWORD GetFileSize(
   HANDLE hFile,	   // Указатель на файл
   LPDWORD lpFileSizeHigh // Здесь вернут старший байт размера файла
   );

  Для Delphi

   function GetFileSize(
    hFile: THandle;         // Указатель на файл
    lpFileSizeHigh: Pointer // Здесь вернут старший байт размера файла
    ): DWORD; stdcall;

  Для С/С++

   DWORD GetFileType(
    HANDLE hFile,	 // Указатель на файл
   );

  Для Delphi

    function GetFileType(
     hFile: THandle;     // Указатель на файл
     ): DWORD; stdcall;

  Для С/С++

  DWORD GetLogicalDrives(VOID)

  Для Delphi

  function GetLogicalDrives: DWORD; stdcall;

var
 ct: byte;
 drives: set of 0..25;
begin
 integer(drives) := GetLogicalDrives;
 for ct := 0 to 25 do
  if ct in drives then
   begin
    Драйв по имени "char(ct + ord('A')) + ':'" существует.
    Можно выполнить операцию:
    Добавить_в_Список_драйвов(char(ct + ord('A')) + ':');
   end;

  Для С/С++

  DWORD GetShortPathName(
    LPCTSTR lpszLongPath, //Указатель на длинный путь к файлу
    LPTSTR lpszShortPath, // Сюда поместять результат
    DWORD cchBuffer 	  // Длинна буфера, куда поместят результат
   );

  Для Delphi

   function GetShortPathNameA(
     lpszLongPath: PAnsiChar; //Указатель на длинный путь к файлу
     lpszShortPath: PAnsiChar;// Сюда поместять результат
     cchBuffer: DWORD         // Длинна буфера, куда поместят результат
     ): DWORD; stdcall;

  Для С/С++

  DWORD GetTempPath(
    DWORD nBufferLength, // Размер буфера
    LPTSTR lpBuffer 	 // Буфер
   );

  Для Delphi

  function GetTempPath(
    nBufferLength: DWORD;// Размер буфера
    lpBuffer: PChar      // Буфер
   ): DWORD; stdcall;

  Для С/С++

 BOOL GetVolumeInformation(
  LPCTSTR lpRootPathName,	// Какой диск
  LPTSTR lpVolumeNameBuffer,	// Буфер для имени метки
  DWORD nVolumeNameSize,	// Размер буфера метки
  LPDWORD lpVolumeSerialNumber,	// Серийный номер
  LPDWORD lpMaximumComponentLength,// Максимальная длинна компонентов
  LPDWORD lpFileSystemFlags,	// Системные флаги
  LPTSTR lpFileSystemNameBuffer,// Буфер имени файловой системы
  DWORD nFileSystemNameSize 	// Размер буфера имени файловой сист.
 );

  Для Delphi

  function GetVolumeInformationA(
   lpRootPathName: PAnsiChar;    // Какой диск
   lpVolumeNameBuffer: PAnsiChar;// Буфер для имени метки
   nVolumeNameSize: DWORD;       // Размер буфера метки
   lpVolumeSerialNumber: PDWORD; // Серийный номер
   var lpMaximumComponentLength, // Максимальная длинна компонентов
   lpFileSystemFlags: DWORD;     // Системные флаги
   lpFileSystemNameBuffer: PAnsiChar;// Системные флаги
   nFileSystemNameSize: DWORD    // Размер буфера имени файловой сист.
   ): BOOL; stdcall;

  Для С/С++

  BOOL MoveFile(
    LPCTSTR lpExistingFileName,	// Полный путь к исходному файлу
    LPCTSTR lpNewFileName 	// Полный путь к новому месту
   );

  Для Delphi

  function MoveFile(
   lpExistingFileName, // Полный путь к исходному файлу
   lpNewFileName: PChar// Полный путь к новому месту
  ): BOOL; stdcall;

 MoveFile('c:Temp.txt', 'C:WindowsTemp.txt')