Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Standard window grouping boxes
Message
De
06/01/2000 12:40:56
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
 
À
06/01/2000 10:19:56
Information générale
Forum:
Visual FoxPro
Catégorie:
Classes - VCX
Divers
Thread ID:
00313893
Message ID:
00313989
Vues:
48
>I'm trying to create a class that will make boxes that look like the standard window grouping boxes (the old Foxprow genscrnx frame3d box). Everything looks fine at runtime, but I can only access controls placed inside (front of) the shape via the keyboard. I cannot select them by the mouse. Any ideas why this happening?
>
>The base class is a shape with a backstyle property of Opaque and a border color of 128,128,128. In the init method of the shape I have the following code:
>
>* create another shape on top (just to the right and above) of this shape
>* with a white bordercolor to give the 3 dimensional look like the
>* standard window grouping boxes
>cname = "o"+right(sys(2015),7)
>this.parent.addobject(cname,"shape")
>onewshape = eval("this.parent."+cname)
>onewshape.left = this.left + 1
>onewshape.top = this.top + 1
>onewshape.width = this.width
>onewshape.height = this.height
>onewshape.bordercolor = rgb(255,255,255)
>onewshape.backstyle = 0
>onewshape.visible = .t.
>
>Tim


Tim,
New shape blocks mouse clicks. Send it back with zorder(1) in init (before visible = .t.
Another harder way is let the shape control the mouse events and pass to background objects calculating position.
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform