Delphi7窗口不要最大化。最小化可以了。一个关闭,一个最小化,最大化按不到下去就对了。请问怎样 20

Delphi7窗口不要最大化。最小化可以了。一个关闭,一个最小化,最大化按不到下去就对了。请问怎样弄?... Delphi7窗口不要最大化。最小化可以了。一个关闭,一个最小化,最大化按不到下去就对了。请问怎样弄? 展开
 我来答
xiangjuan314
2016-04-18 · TA获得超过3.3万个赞
知道大有可为答主
回答量:2.9万
采纳率:0%
帮助的人:2847万
展开全部
procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
sendmessage(form1.WindowHandle,WM_SYSCOMMAND,SC_ICON,0);//窗体最小化灶镇宴察 任务栏中
end;

procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
form1.WindowState := wsMaximized;//窗体最大化
end;

procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
form1.WindowState := wsminimized;//窗体最小化到 任隐祥粗务栏上方
end;

procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
form1.WindowState := wsnormal;//窗体正常化
end;
追问

左下角那里不可以选。要怎样才可以。
天祥369
2018-03-23
知道答主
回答量:18
采纳率:0%
帮助的人:1.1万
展开全部
Form属性BorderStyle设置bsSingle,然后BorderIcons,把biMaximize选择为False。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式