动态生成的TPanel组件，如何得到相应组件的Caption会值？100分求助!

Question

大家好，有个较难的问题，我用动态数组生成了N个动态的TPanel控件，为每一个动态的控件都赋了一个不同的Capiton值，然后，定义了一个事件OnMouseMove，pl[i].OnMouseMove := MyOnMouseMove;事件原型
procedure TfrmMain.MyOnMouseMove(Sender: TObject;
  Shift: TShiftState; X, Y: Integer);
begin
showmessage(sender.ClassName+'X:'+IntToStr(X)+ '   Y:'+IntToStr(Y));
//如何得到 sender.Caption   这里传过来的没有Caption。
end;现在，这个事件可以在 MyOnMouseMove 收到动态生成的的TPanel的事件响应（可以得到X，Y坐标等等）。
现在，我想在这个事件里面得到相应的控件的Caption值，不知道该怎么操作了，有朋友可以帮帮我吗？

Answer 1

(Sender as TPanel).Caption正解~