with this .AddProperty('nStartWitdth',.width) .AddProperty('nStartHeight',.height) endwithAnd you must put some code in the resize event of the form, something like this:
With This Do Case Case .Width<.nStartWitdth And .Height<.nStartheight .ScrollBars=3 Case .Width<.nStartWitdth .ScrollBars=1 Case .Height<.nStartheight .ScrollBars=2 Otherwise .ScrollBars=0 Endcase EndwithWhen I tested it, I had to set the scrollbars to 3 in the property sheet to get it to work,