background image
<< Porting Tests - SGetGUIType function | Supporting Internationalized Applications >>
Porting Tests - the sPath variable
<< Porting Tests - SGetGUIType function | Supporting Internationalized Applications >>
User's Guide
279
13 P
ORTING
T
ESTS
TO
O
THER
GUI
S
Supporting differences in application behavior
·
For all other GUIs, enters the value of the sPath variable directly into the
appropriate text field.
SetWorkingDirectory (STRING sPath)
// this function sets the working directory
switch (GetGUIType ())
case mac
INTEGER iFolder = 1
STRING sFolder
UserSetup.Invoke ()
// : is the directory separator on the mac
sFolder = GetField (sPath, ':', iFolder)
while (sFolder != '')
SelectFolder.Folder.DoubleSelect (sFolder)
iFolder += 1
sFolder = GetField (sPath, ':', iFolder)
SelectFolder.CurrentFolder.Click ()
UserSetup.Dismiss ()
default
UserSetup.Invoke ()
UserSetup.Directory.SetText (sPath)
UserSetup.Accept ()