Question

delphi中如何编写鼠标的滑过事件？

我想在delphi中让鼠标在一个按钮（标签）上经过/停留是显示另外一个按钮（标签） 有点类似于qq中把鼠标放在头像上就出来qq秀一样 这是我现在的代码 unit unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TButton; Button3: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1MouseMove(Sender: TObject); begin Button2.visible:=true; Button3.visible:=true; end; end. 但是编译后报错说：Cannot debug project unless a host application is defined.Use the Run|Parameters...dialog box. 请问是什么原因？应该怎么修改？

Answer 1

你代码肯定是直接复制过来的吧？ 你在Label1的事件里点进去写代码~ 你的问题我自己试了下，没有出错~