Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
GDI+ in VFP8
Message
De
29/11/2006 11:25:10
Scott Butts
Ims Specialty Services
Twin Falls, Idaho, États-Unis
 
 
À
29/11/2006 02:36:28
Information générale
Forum:
Visual FoxPro
Catégorie:
Photos et traitement d'images
Titre:
Divers
Thread ID:
01173115
Message ID:
01173313
Vues:
7
>>Is it possible to do any GDI stuff in VFP8? I just want to do a simple gradient fill to help in the visual appearance on a few forms. All the examples I have found are with VFP9.
>>
>>Scott
>
>No need to use GDI! To get a gradient background, put this code in yourform.resize:
>LOCAL lnRow
>ThisForm.ScaleMode = 3
>ThisForm.DrawWidth = 1
>FOR lnRow = 0 TO ThisForm.width
>   ThisForm.ForeColor = RGB(0,0,255-255*lnRow/ThisForm.width) && Change the color values to your preference
>   ThisForm.Line(lnRow, 0,lnRow,ThisForm.height)
>NEXT lnRow
>Yourform.init:
>this.resize()
Cool! Thanks for the info.

Scott
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform