摘要：看到一个好方法，调用api，再不用在 move down up事件下来回计算了具体方法如下控件的 onmousemove事件内写如下代码ReleaseCapture;//Prevents the control from currently capturing all the mouse messages.阻止控件捕获当前的所有鼠标消息//Capture empties the root's Captured property.SendMessage(Self.Handle,WM_SYSCOMMAND,SC_MOVE+1,0); 阅读全文

摘要：Delphi code//譬如 %WINDIR% 是表示系统目录的系统变量, 可以这样获取:var s: string;begin s := GetEnvironmentVariable('WINDIR'); ShowMessage(s); {C:\WINDOWS}end;一些系统目录变量列表：变量描述%WINDIR%{系统目录 - C:\WINDOWS}%SYSTEMROOT%{系统目录 - C:\WINDOWS}%SYSTEMDRIVE%{系统根目录 - C:}%HOMEDRIVE%{当前用户根目录 - C:}%USERPROFILE%{当前用户目录 - C:\Docume 阅读全文