【搞定】[请求]关于左边菜单的一个问题**

天河

因为客户不知道有些菜单项到底用来实现什么功能，而他又不想花时间去看成段成段的说明书的。所以客户想当鼠标移到左边的菜单栏时，能有对这个菜单功能的一个简单解释弹出/显示。

请问能否实现这种效果。

lixy

这个需要改系统界面部分的代码。
我做了一个想法，你可以进一步改进这个代码。

在“业务模型\系统空间\用户界面基础\界面库\组件库”代码中
  TOperatorFuncTreeView = class(TUserBizTreeView)  
声明中加一个事件函数
procedure TreeViewMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
在下面实现这个函数
procedure TOperatorFuncTreeView.TreeViewMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
     if  assigned(self.GetNodeAt(x,y)) then
    self.Hint:= self.GetNodeAt(x,y).Text+'_lxy';//你可以根据text（功能的文字名称）判断，然后出不同的提示。
end;


然后在这个类的create函数最后加一句:

self.OnMouseMove:=TreeViewMouseMove;

lixy

楼主还有问题吗？

jiahaiminghr

由于长时间没有反馈，先结贴了，
有问题请开新贴！