First,drag a TLabel component to a form.

Then,set TCAD's LabelXY property as Label1.
Last,it will show mouse position in TCAD when you move mouse.
Also,it can do it by code.

Code example:

procedure TMainFrm.Button1Click(Sender: TObject); 
begin 
  MyCAd1.LabelXY:=Label1; 
  //... 
end;