DEFINE CLASS oChild AS CUSTOM
cSex = ''
nWeightInPounds = 0
nLengthInInches = 0
ENDDEFINE
oFamily = NEWOBJECT("container")
oFamily.NEWOBJECT("AdamJamesLeClair","oChild")
WITH oFamily.AdamJamesLeClair
.cSex = "M"
.nWeightInPounds = 6.5
.nLengthInInches = 19
.Show("12/22/2000 11:23AM")
ENDWITH
Dan LeClair
www.cyberwombat.comSET RANT ON - The Wombat BlogLife isn’t a morality contest and purity makes a poor shield. - J. Peter MulhernDisclaimer: The comments made here are only my OPINIONS on various aspects of VFP, SQL Server, VS.NET, systems development, or life in general, and my OPINIONS should not be construed to be the authoritative word on any subject. No warranties or degrees of veracity are expressed or implied. Void where prohibited. Side effects may included dizziness, spontaneous combustion, or unexplainable cravings for dark beer. Wash with like colors only, serve immediately for best flavor.
