[DELPHI]網(wǎng)絡鄰居復制文件

時間：2020-10-28 19:22:23 筆試經(jīng)驗我要投稿

◇[DELPHI]網(wǎng)絡鄰居復制文件

　　uses shellapi;

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

　　◇[DELPHI]產(chǎn)生鼠標拖動效果

　　通過MouseMove事件、DragOver事件、EndDrag事件實現(xiàn),例如在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 shellapi;

　　var windir:array[0..255] of char;

　　getwindowsdirectory(windir,sizeof(windir));

　　或者從注冊表中讀取,位置:

　　HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion

　　SystemRoot鍵,取得如:C:\WINDOWS

【[DELPHI]網(wǎng)絡鄰居復制文件】相關文章：

国产女人18毛片水真多18精品, 一区二区三区中文字-亚洲精品女国产, 欧美熟妇老熟妇88888久久久久, 一级毛片免费观看亚洲欧美国产精品,大波霸美女视频,日韩欧美激情V影院,熟女人伦21p,亚洲精品女国产,国产 乱子伦 在线