I am using this approach:
Code: Select all
run() :-
% Existing IDE variable 'TestVar' set to "MyTestVariableAsString"
console::write("\nStarting test ...\n"),
RootKey = @"SOFTWARE\Prolog Development Center\Visual Prolog6\settings\toolsDirList",
Key = "TestVAR", % NOT case-sensitive
if string(V) = registry::tryGetValue(registry::currentUser, RootKey, Key) then
console::write("Found value: ", V)
else
console::writef("Not found: Key '%' under '%'", Key, RootKey)
end if,
console::write("\nPress enter to exit."),
_ = console::readLine().
(2) How can I retrieve the project's 'File Flags' information (Project Settings > Version Information > File Flags)?