定义事件

Question

procedure TForm1.Button1Click(Sender: TObject);
begin
FindFile('e:\');
end;procedure TForm1.Button1Click(Sender: TEdit);
begin
FindFile('e:\');
end;为什么下面的就用不来啊   还有TMouseMoveEvent = procedure(Sender: TObject; Shift: TShiftState; X, Y: Integer) of object;
这个定义能不能帮我解释下啊,解释清楚点啊,困惑我多时了....
可不可以推荐一本这方面的书本啊

Answer 1

不明白楼主前面两段代码想说明什么？