当前位置:主页>销售管理软件> 列表

如何使childform的大小正好等于MDIForm的客户 找金蝶erp软件下载

记账软件版1楼: 我见过别人做过,但不知道如何实现,望各位大侠指教,谢谢

2楼: childform最大化即可 如金蝶erp软件下载

3楼: Application.MainForm.ClientRect (TRect)

4楼: 可能我没把问题说清楚,我是指childform在mdiform菜单栏及工具栏的下面,状态栏上面的那个区域,谢谢

5楼: MDIFORM.WindowState := wsMaximized

6楼: 不对不是这样的

记账软件版7楼: procedure TForm1.ToolButton1Click(Sender: TObject);
begin
with TForm2.Create(Self) do
begin
Top := 0;
Left := 0;
Height := Self.ClientHeight - 21 - Self.ToolBar1.Height;
Width := Self.ClientWidth - 21;
Show;
end;
end;

8楼: royal1442,你好,你式中的21代表什么?望赐教,是指状态高度吗

9楼: 21是窗口标题栏的高度!呵呵

10楼: 谢谢royal1442大侠, 散分