- 博客(3)
- 资源 (2)
- 收藏
- 关注
原创 delphi编程技巧
◇[DELPHI]网络邻居复制文件 uses shellapi; copyfile(pchar(newfile.txt),pchar(//computername/direction/targer.txt),false);◇[DELPHI]产生鼠标拖动效果 通过MouseMove事件、DragOver事件、EndDrag事件实现,例如在PANEL上的LABEL: var xpanel,
2008-04-29 11:01:00 979 1
原创 Hint 多样性
普通Hint:直接设置窗体和组件的ShowHint属性为True,并在其Hint中输入文字内容即可。解释:ShowHint属性则决定鼠标指向构件时是否显示文本提示盒,Hint属性指定文本提示盒中的文本。用户可在对象监视器(ObjectInspector)的属性栏中设置或在程序中修改Hint及ShowHint属性。 经改造的Hint:Delphi还在类TApplication中提供了Hin
2008-04-29 10:53:00 620
原创 Hint
但鼠标移动到某控件上,将会显示文字说明HINT属性输入显示内容且SHOWHINT设为TRUE即可如果想把文字显示在状上,使用下面procedure TForm1.AppHint(Sender: TObject); begin Statusbar1.Panels[0].Text:=Application.Hint; end;
2008-04-29 10:47:00 390
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人