Как найти директорию TEMP в Windows 1
Как найти директорию TEMP в Windows 1
Как найти директорию TEMP в Windows type function GetLongPathNameA(lpszShortPath, lpszLongPath: PChar; cchBuffer: DWORD): DWORD; stdcall external kernel32; ... procedure TForm1.Button2Click(Sender: TObject); var ShortPath, LongPath: array[0..MAX_PATH - 1] of Char; begin if GetTempPath(MAX_PATH, @ShortPath[0]) > 0 then if GetLongPathNameA(ShortPath, @LongPath[0], MAX_PATH) > 0 then ShowMessage(String(LongPath)); end;