485
edits
mNo edit summary |
m (Use RefClass instead of the legacy U_ notation) |
||
Line 8: | Line 8: | ||
String sWorkspaceWSFile | String sWorkspaceWSFile | ||
Handle hoWorkspace hoIniFile | Handle hoWorkspace hoIniFile | ||
Move (phoWorkSpace(ghoApplication)) to hoWorkspace | Move (phoWorkSpace(ghoApplication)) to hoWorkspace | ||
Get psWorkspaceWSFile of hoWorkspace to sWorkspaceWSFile | Get psWorkspaceWSFile of hoWorkspace to sWorkspaceWSFile | ||
Get Create | Get Create (RefClass(cIniFile)) to hoIniFile | ||
Set psFilename of hoIniFile to sWorkspaceWSFile | If (hoIniFile) Begin | ||
Set psFilename of hoIniFile to sWorkspaceWSFile | |||
Get ReadString of hoIniFile 'Workspace' sKey ' ' to sValue | |||
Send Destroy of hoIniFile | |||
End | |||
Function_Return sValue | Function_Return sValue | ||
End_Function | End_Function | ||
Line 24: | Line 27: | ||
</source> | </source> | ||
Add a new DocsFolder option to the .ws file like so: | |||
<source lang="ini"> | <source lang="ini"> | ||
//The .ws file may look like this: | //The .ws file may look like this: |