Delphi实现图像热点功能，实现一张图片上不同形状区域的热点，定义椭圆形、四边形、三角形的区域变量的热点，相关代码如下： 　　var 　　thepoint:array[1..8]oftpoint;//存储多边形顶点坐标 　　count:integer; 　　pointnum:array[1..2]ofinteger; 　　begin 　　//四边形顶点坐标，首末点封闭 　　thepoint[1]:=point(135,99); 　　thepoint[2]:=point(105,183); 　　thepoint[3]:=point(129,20