//光标在控件不同位置时的样式 // 由于拐角这点手动精确实在困难 所以用范围 范围+3 这样很容易就找到这一点了 procedure CtrlMouseMove(Ctrl: TWinControl; Shift: TShiftState;X, Y: Integer); begin with Ctrl do begin ) ) then begin ) ) then Cursor := crSizeNWSE; ) ) then Cursor := cRsizewe; ) and (Y <= He
1.改变窗体图标 先把图标放到项目文件夹中,然后点击窗体属性的ICON添加即可. 参考:https://www.cnblogs.com/yangxuli/p/8075484.html?tdsourcetag=s_pctim_aiomsg. 2.任意确定窗体程序打开初始打开位置 这里以窗体放置在屏幕下方居中为例,先获取当前显示屏大小,该函数是不包括任务栏的: //获取显示器屏幕的大小,不包括任务栏.停靠窗口 int SH = Screen.PrimaryScreen.WorkingArea.Hei