动态改变属性示例-Delphi程序设计教程—Windows窗体和常用组件
动态改变属性示例利用Caption属性在程序运行时动态显示鼠标在窗体上位置的X坐标。由于在设计时我们不知道鼠标在窗体上动态位置，因此只能在窗体的运行期间通过代码来完成Caption属性的设置procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin Form1.Caption:='鼠标所在位置：X:='+IntToStr(x)+ ' Y:='+IntToStr(y); end;
文件大小：1.53MB
评论区