Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Scrollbar on form?
Message
De
07/04/2004 09:12:29
 
 
À
07/04/2004 09:06:00
Koos Veel
Gamma Research
Aruba
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00892800
Message ID:
00892884
Vues:
18
Yoy're Welcome

>Hi Tore,
>
>Thanks!
>
>>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.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform