Doh!

>Error: Property BordType is not found.
>
>>Hi Folks.
>>
>>
>>DEFINE CLASS cooktimer AS Timer
>>PROCEDURE Timer
>> WAIT WIND "Happy Thanksgiving!" NOWAIT
>>ENDPROC
>>ENDDEF
>>DEFINE CLASS fowl AS Custom
>>Cooked = .F.
>>Weight = 20
>>BirdType = ""
>>PROCEDURE Init
>>PARAMETERS cBirdType
>>This.BordType=cBirdType
>>ENDPROC
>>PROCEDURE cook
>>THIS.AddObject("OvenTimer","cooktimer")
>>This.CookTimer.Interval=2180000
>>ENDPROC
>>ENDDEF
>>
>>oTurkey = CREATEOBJECT("fowl","Turkey")
>>oTurkey.Cook