GetDir / GetCurrentDir

Hi everybody,

I've been trying to get the GetDir or GetCurrentDir to work and have followed some examples from delphibasics.co.uk but with no success. Is it possible that these commands are not available in the vocabulary of My Visual Database ?

Example

var
  dir : string;

begin
  // Get the current directory
  dir := GetCurrentDir;
  ShowMessage('Current directory = '+dir);
end;

Show full unit code
   Current directory = C:\Program Files\myproject\images\

Thanks for any help you can give me.