欢迎访问 生活随笔!

生活随笔

当前位置: 首页 > 编程资源 > 编程问答 >内容正文

编程问答

DELPHI 禁止移动窗体

发布时间:2025/7/14 编程问答 42 豆豆
生活随笔 收集整理的这篇文章主要介绍了 DELPHI 禁止移动窗体 小编觉得挺不错的,现在分享给大家,帮大家做个参考.

完整的代码如下:

unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;typeTForm1 = class(TForm)lbl1: TLabel;privateprocedure WMSYSCOMMAND(var msg:TMessage);message WM_SYSCOMMAND;{ Private declarations }public{ Public declarations }end;varForm1: TForm1;implementation{$R *.dfm}procedure TForm1.WMSYSCOMMAND(var msg: TMessage);beginif msg.WParam=SC_CLOSE then Close;if msg.WParam=SC_MOVE then msg.WParam:=0;end;end.

 

转载于:https://www.cnblogs.com/qqook/p/3444993.html

总结

以上是生活随笔为你收集整理的DELPHI 禁止移动窗体的全部内容,希望文章能够帮你解决所遇到的问题。

如果觉得生活随笔网站内容还不错,欢迎将生活随笔推荐给好友。