Odczyt ścieżki dostępu do katalogu Windowsa

Aby po kliknięciu przycisku Button1 na etykiecie Label1 wyświetlić ścieżkę dostępu do katalogu Windowsa należy skorzystać z funkcji Windows API GetWindowsDirectory():

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   AnsiString WinDir;
   UINT BufferSize = GetWindowsDirectory(NULL, 0);
   WinDir.SetLength(BufferSize + 1);
   GetWindowsDirectory(WinDir.c_str(), BufferSize + 1);
   Label1->Caption = WinDir;
}

Tym katalogiem jest zazwyczaj katalog c:\windows.