var
dir : string;
begin
// Get the current directory
dir := GetCurrentDir;
ShowMessage('Current directory = '+dir);
end;
Overview
Content Tools
var
dir : string;
begin
// Get the current directory
dir := GetCurrentDir;
ShowMessage('Current directory = '+dir);
end;