文件名称:Delphi不让窗体最小化显示.rar
文件大小:5KB
文件格式:RAR
更新时间:2022-07-30 12:25:41
Delphi源码-界面编程
Delphi让窗体始终保持最大化,Delphi不让窗体最小化,只能最大化显示,当点击最小化的时候会弹出一个提示,告之不支持此项操作,程序通过判断消息类型是否"最小化"或"恢复",是则进入自己处理函数、不是则采取系统默认处理方式。具体操作代码如下: if (Msg.CmdType =SC_MINIMIZE) or (Msg.CmdType =SC_RESTORE) then //判断消息类型是否"最小化"或"恢复" //是则进入自己处理函数 begin ShowMessage('不能最小化'); Msg.Result:=0; end else //不是则采取系统默认处理方式 inherited; end;
【文件预览】:
codesc.net
----使窗体始终最大化()
--------Unit1.bkm(126B)
--------Unit1.ddp(51B)
--------Project1.stat(160B)
--------Project1.res(876B)
--------Unit1.dcu(4KB)
--------Unit1.dfm(357B)
--------Project1.dpr(188B)
--------Unit1.pas(797B)