如何在一张大图片上，定义若干形状不规则的热区，且热区能响应鼠标事件(Croco来回答)(40分)

  • 主题发起人 主题发起人 hikehilter
  • 开始时间 开始时间
H

hikehilter

Unregistered / Unconfirmed
GUEST, unregistred user!
分数少了点,但是这个问题你以前回答过了,但是现在我看你提供的超链接,无法使用.请告知
 
两种答案：一，各种资料中我都见过这类的问题，用设置区域的api函数，
二，一种比较投篮的方法：到处都有不规则图形的控件，随便下载一个，
然后把visable属性社为flase ,不就齐了，
给我点分吧，急用，谢谢，控件你可以去随便那一个斑竹的竹叶取下在
 
一个简单有效的办法,在图片上放置Lable!
将属性设为透明即可!支持鼠标操作!
 
是不是要截取热区的图像？
 
procedure TForm1.image1MouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
var
TheRect:array [0..1] of TRect
begin
for I :=0 to 1 do
if PtInRect(therect,pt) then application.MessageBox('信息','程序执行确认');
／／主要是截取热区图像；
end;

快给分吧．[:)]
 
我有一个绝对满足你要求的控件，为此我还做一个Demo，一个人的图片，你点击鼻子，他告诉你点击了
鼻子，当你鼠标嘴上，嘴吧张开，当你移到眼睛上，眼睛眨了眨，总之，你可以在这幅图片上，做你想
做的事，另外，你也可以自定义热点的形状，以满足需要。
 
如果需要的话，请写信告诉我。e-mail：
liaohz@fulltop.com
 
to liaohz能给我一份吗？谢谢！tiansan@sina.com
 
to liaohz能给我一份吗？谢谢！
huzengqi@china1mail.com
 
to liaohz能给我一份吗？谢谢！
HyphoonLee@21cn.com
 
“不规则图形的控件”？？？哪有？？我真想要一个。
 
[^]到！Visable为False时，是没有办法响应一些事件了。
 
接受答案了.
 
您必须登录或注册才可回复。

Similar threads

N
您想不写一行代码，使您应用程序具有MacOS和WinXP风格的外观或创建任意形状的不规则窗口吗？(100分)
2 3
回复
45
查看
601
Nicrosoft
N
I
我爱我的祖国，我也热爱自由！！！！(0分)
2
回复
31
查看
375
dirk
D
胖
如何在一张大图片上，定义若干形状不规则的热区，且热区能响应鼠标事件。(200分)
回复
9
查看
1K
胖熊
胖
N
中国人来看一下：梦回唐朝(0分)
回复
10
查看
228
nzfsoft
N
A
请各位朋友帮我评估评估,这个软件的源码值多少钱还是值不值钱.(50分)
2
回复
33
查看
549
aizb
A
后退
顶部