关于网友提出的“ 如下需求如何实现”问题疑问,本网通过在网上对“ 如下需求如何实现”有关的相关答案进行了整理,供用户进行参考,详细问题解答如下:
问题: 如下需求如何实现
描述: 我鼠标移动在一个控件上面,能够出现类似HINT的提示,界面和现实效果可以和HINT类似,但是具体显示的内容不能局限于文字描述,应该能够和FORM一样,编辑界面,支撑程序控制。
请问上面的需求用什么实现,有没有现成的空间。这儿需求我在很多软件都看到,觉得很实用就是不知道怎么做,谢谢!
不知道各位大侠是否明白?
解决方案1: 用窗体代替hint,首先uses Unit2;
procedure TForm1.Button1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var
p:TPoint;
begin
GetCursorPos(p);
form2.Show;
Form2.Left := p.X;
Form2.Top := p.Y;
end;
至于何时关闭form2,那你就自己看着办吧
以上介绍了“ 如下需求如何实现”的问题解答,希望对有需要的网友有所帮助。
本文网址链接:http://www.codes51.com/itwd/2249228.html