function c_GetTempPath: string; var Buffer: array[0..1023] of Char; begin SetString(Result, Buffer, GetTempPath(Sizeof(Buffer) - 1, Buffer)); end;
этот код так же можно использовать для:
