class TfrmMain : public TForm
{
__published: // IDE-managed Components
TLabel *Label1;
TLabel *Label2;
TLabel *Label3;
void __fastcall FormCreate(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TfrmMain(TComponent* Owner);
};
void __fastcall TfrmMain::FormCreate(TObject *Sender)
{
String Path;
Path = GetHomePath(); // SysUtils
Label1->Caption = Path;
Path = TPath::GetHomePath(); // System.IOUtils
Label2->Caption = Path;
Path = GetEnvironmentVariable("APPDATA");
Label3->Caption = Path;
}