改造dxflowchart 控件

Question

想改造一下DevExpress的dxflowchart控件，就是给框对象(矩形、圆形、三角形等)添加鼠标Cursor属性，在浏览流程图界面，当鼠标移到这个框的位置时，就可以根据设置的Cursor属性显示相应的鼠标状态，比如设置为crHandPoint，就显示为手型。并且将那个框对象突出。

Answer 1

procedure Tfrm_FlowChart.dxFlowChart1MouseMove(Sender: TObject;
  Shift: TShiftState; X, Y: Integer);
var
  AItem : TdxFcObject;
begin
  //鼠标样式置为默认
  dxFlowChart1.Cursor := crDefault;  //获取当前鼠标位置下的对象
  AItem := dxFlowChart1.GetObjectAt(x, y);  //状态栏初始化
  //StatusBarTxt('');  //AItem不为空, 且是Object  通过Tag设置, 可以控制鼠标样式只在特定对象上有变化
  if (AItem <> nil) and (AItem.Tag >= 0) then
  begin
    //鼠标样式
    dxFlowChart1.Cursor := crHandPoint;
    //状态栏显示当前获取的对象标题
    //StatusBarTxt(AItem.Text);
  end;  //Caption := IntToStr(x) + ',' + IntToStr(y);
end;

Answer 2

非常感谢 simonhehe 猩猩无罪经过测试，可以实现那效果！请问要如何导入自制的箭头，dxFlowChart1的连线、箭头太不好看了，现在想可以导入自制的连线、箭头，并且可以调出来绘制流程图！谢谢！
100分全部奉上！