在VFP中制作异型的浮动按钮

Author: 吕兆球 Date: 2001年 18期

?牐犞谱髌嫘喂肿吹幕疃磁ィ诙嗝教逯嗳砑惺且患菀字拢鏔lash；但对于开发数据库用的Visual FoxPro呢？其实也不太难。你看看就知道了。
　　?牐犓幕臼迪衷硎牵河捎赩isual FoxPro支持GIF图形，而GIF图形又是可以设置透明色的。如此一来，我们可以把设置了透明色的异形GIF图片当作“按钮”使用。对于浮动，那不过是两个叠加的控件，根据鼠标的移动而改变状况罢了。
　　?牐牷故蔷僖桓隼樱褐谱髁秸糯笮∫谎娜切瓮计徽攀怯辛⑻甯械模産1.gif，一张是平面的，名之b2.gif。把这两张图片中三角形之外的区域都设置成透明。在Visual FoxPro中新建的表单中插入image1，其picture属性为b1.gif，visible属性为.f.；在image1正上方叠加image2，其picture属性为b2.gif。并添加如下代码。
　　?牐燜orm1的MouseMove事件：
　　?牐爃isform.image1.visible=.f.
　　?牐爐hisform.image2.visible=.t.
　　?牐營mage2的MouseMove事件??
　　?牐爐hisform.image1.visible=.t.
　　?牐爐hisform.image2.visible=.f.
　　?牐犜趇mage1的Click事件中添加你的代码。
　　?牐牶昧耍４娌⒃诵芯涂梢钥吹叫Ч恕?
　　
　　