Hi Koos,

First you must add code in the load event to add properties to hold the default size of the form:

with this
   .AddProperty('nStartWitdth',.width)
   .AddProperty('nStartHeight',.height)
endwith

And 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
Endwith

When I tested it, I had to set the scrollbars to 3 in the property sheet to get it to work,




>Hello All,
>
>Does anybody know how to get a vertical scrollbar on a form (automatically) when the _screen is resized to a smaller size than the form?
>
>Thanks,
>
>
>koos Veel.