编程论坛 → Delphi论坛

这个问题有点好奇

ensr2006 发布于 2006-05-30 15:01， 587 次点击

问一问大家如何做一个这样的功能？？就是一个图片鼠标经过的时候图片的颜色变了或者是变的另外一个图片了？？？

5 回复

dxcqdx2006-06-02 10:33

经过?

ensr20062006-07-05 10:40

晕，怎么人气不旺哟？？？

金发2006-07-12 09:15

以imgage控件为例在mousemove时间中实现：

procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,Y: Integer);
var picpath:string;
picfile:string;
begin
picpath:='文件路径';
picfile:='文件名';
Image1.Picture.LoadFromFile(picpath+picfile);
end;

kjiwu2006-07-12 17:18

同意楼上，只需在Image1MouseMove函数中使用Image1.Picture.LoadFromFile就能改变Image加载的图片

小虫3132006-07-12 17:25

又学了