>hidden procedure DebugDir_Access
> if empty(this.DebugDir)
> wait window 'DebugDir property has not been set'
> endif
>endproc

Check out the help file for Access methods, you're supposed to return from the access method the value that will "appear" to be in the property.