P Paul_Cheung Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-12 #1 如何使无标题窗口最大化？自制的最大化，最小化按钮怎么实现 ？谢谢！
Z zealothasu Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-12 #2 最大化 Self.WindowState := wsMaximized; 最小化 Self.WindowState := wsMinimized; 或者 Application.Minimize;
P Paul_Cheung Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-12 #3 谢谢你，能具体点吗？？？zealothasu
Z zskonhon Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-12 #4 procedure WMLBUTTONDOWN(Var Message:TWMSize); Message WM_Size; begin if Message.SizeType=SIZE_MAXIMIZED then end;
procedure WMLBUTTONDOWN(Var Message:TWMSize); Message WM_Size; begin if Message.SizeType=SIZE_MAXIMIZED then end;
S sunrain_114 Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-12 #5 你在面板上放两个按钮，分别写上： procedure TForm1.Button1Click(Sender: TObject); begin Self.WindowState := wsMaximized; end; procedure TForm1.Button2Click(Sender: TObject); begin Self.WindowState := wsMinimized; end; 即可
你在面板上放两个按钮，分别写上： procedure TForm1.Button1Click(Sender: TObject); begin Self.WindowState := wsMaximized; end; procedure TForm1.Button2Click(Sender: TObject); begin Self.WindowState := wsMinimized; end; 即可
A angelgekko Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-12 #6 PostMessage(handle, WM_SYSCOMMAND, SC_MINIMIZE, 0); // 发送最小化消息 PostMessage(handle, WM_SYSCOMMAND, SC_MAXIMIZE, 0); // 发送最大化消息 PostMessage(handle, WM_SYSCOMMAND, SC_RESTORE, 0); // 发送还原消息
PostMessage(handle, WM_SYSCOMMAND, SC_MINIMIZE, 0); // 发送最小化消息 PostMessage(handle, WM_SYSCOMMAND, SC_MAXIMIZE, 0); // 发送最大化消息 PostMessage(handle, WM_SYSCOMMAND, SC_RESTORE, 0); // 发送还原消息
A angelgekko Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-12 #8 我说的也是无标题的窗口。 发送消息你写在一个按钮事件里看看
M moonbird888 Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-12 #9 加一个图片，然后在图片的onclick事件中写上： 最大化 Self.WindowState := wsMaximized; 最小化 Self.WindowState := wsMinimized; 或者 Application.Minimize; 就可以了。 没有相应的图片或按钮怎么能让用户知道，点这可以最大或最小化？
加一个图片，然后在图片的onclick事件中写上： 最大化 Self.WindowState := wsMaximized; 最小化 Self.WindowState := wsMinimized; 或者 Application.Minimize; 就可以了。 没有相应的图片或按钮怎么能让用户知道，点这可以最大或最小化？
