{$IFNDEF WIN32}
const MAX_PATH = 144;
{$ENDIF}

...
implementation
...

var
a : array[0..MAX_PATH] of char;
begin
GetWindowsDirectory(a, sizeof(a));
ShowMessage(StrPas(a));
GetSystemDirectory(a, sizeof(a));
ShowMessage(StrPas(a));