首页 相关文章 Delphi编程技巧集锦

Delphi编程技巧集锦

  ◇[DELPHI]网络邻居复制文件

  uses shellapi;

  copyfile(pchar('newfile.txt'),pchar('//computername/direction/targer.txt'),false);

  ◇[DELPHI]产生鼠标拖动效果

  通过MouseMove事件、DragOver事件、EndDrag事件实现,例如在PANEL上的LABEL:

  var xpanel,ypanel,xlabel,ylabel:integer;

  PANEL的MouseMove事件:xpanel:=x;ypanel:=y;

  PANEL的DragOver事件:xpanel:=x;ypanel:=y;

  LABEL的MouseMove事件:xlabel:=x;ylabel:=y;

  LABEL的EndDrag事件:label.left:=xpanel-xlabel;label.top:=ypanel-ylabel;

  ◇[DELPHI]取得WINDOWS目录

  uses sh...[ 查看全文 ]

2016-02-19 标签:

Delphi编程技巧集锦的相关文章

手机页面
收藏网站 回到头部