>>
>>That's easy. The value is null because it doesn't exist.
>
>The value was set at design time.

use yourform.scx alias CheckForm
locate for CheckGForm.baseclass = "form"
lnPos = at("WindowType = ", CheckForm.properties)
if m.lnPos > 0
    lcType = substr(CheckForm.Properties,m.lnPos + len("WindowType = ")+1,1)
endif