如何实现控件随对话框大小变化而自动调整大小和位置

VB中控件大小随窗体大小变化而变化有时窗体变化后，如改变分辨率后控件大小却不能随之改变。

手工代码调整实在麻烦，下面的模块实现自动查找窗体上控件并使其改变大小以适应窗体变化。

在Form的Resize事件中调用函数Resize_All就能实现控件自动调整大小，如：Private Sub Form_Resize()Dim H, i As IntegerOn Error Resume NextResize_ALL Me 'Me是窗体名，Form1,Form2等等都可以End Sub在模块中添加以下代码：Public Type ctrObjName As StringIndex As LongParrent As StringTop As LongLeft As LongHeight As LongWidth As LongScaleHeight As LongScaleWidth As LongEnd TypePrivate FormRecord() As ctrObjPrivate ControlRecord() As ctrObjPrivate bRunning As BooleanPrivate MaxForm As LongPrivate MaxControl As LongPrivate Const WM_NCLBUTTONDOWN = &HA1Private Declare Function SendMessage Lib "USER32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As LongPrivate Declare Function ReleaseCapture Lib "USER32" () As Long Function ActualPos(plLeft As Long) As LongIf plLeft < 0 ThenActualPos = plLeft + 75000ElseActualPos = plLeftEnd IfEnd FunctionFunction FindForm(pfrmIn As Form) As LongDim i As LongFindForm = -1If MaxForm > 0 ThenFor i = 0 To (MaxForm - 1)If FormRecord(i).Name = ThenFindForm = iExit FunctionEnd IfNext iEnd IfEnd FunctionFunction AddForm(pfrmIn As Form) As LongDim FormControl As ControlDim i As LongReDim Preserve FormRecord(MaxForm + 1)FormRecord(MaxForm).Name = FormRecord(MaxForm).Top = pfrmIn.TopFormRecord(MaxForm).Left = pfrmIn.LeftFormRecord(MaxForm).Height = pfrmIn.Height FormRecord(MaxForm).Width = pfrmIn.Width FormRecord(MaxForm).ScaleHeight = pfrmIn.ScaleHeight FormRecord(MaxForm).ScaleWidth = pfrmIn.ScaleWidth AddForm = MaxFormMaxForm = MaxForm + 1For Each FormControl In pfrmIni = FindControl(FormControl, )If i < 0 Theni = AddControl(FormControl, )End IfNext FormControlEnd FunctionFunction FindControl(inControl As Control, inName As String) As LongDim i As LongFindControl = -1For i = 0 To (MaxControl - 1)If ControlRecord(i).Parrent = inName ThenIf ControlRecord(i).Name = ThenOn Error Resume NextIf ControlRecord(i).Index = inControl.Index ThenFindControl = iExit FunctionEnd IfOn Error GoTo 0End IfEnd IfNext iEnd FunctionFunction AddControl(inControl As Control, inName As String) As LongReDim Preserve ControlRecord(MaxControl + 1)On Error Resume NextControlRecord(MaxControl).Name = ControlRecord(MaxControl).Index = inControl.IndexControlRecord(MaxControl).Parrent = inNameIf TypeOf inControl Is Line ThenControlRecord(MaxControl).Top = inControl.Y1ControlRecord(MaxControl).Left = ActualPos(inControl.X1)ControlRecord(MaxControl).Height = inControl.Y2ControlRecord(MaxControl).Width = ActualPos(inControl.X2)ElseControlRecord(MaxControl).Top = inControl.TopControlRecord(MaxControl).Left = ActualPos(inControl.Left)ControlRecord(MaxControl).Height = inControl.HeightControlRecord(MaxControl).Width = inControl.WidthEnd IfinControl.IntegralHeight = FalseOn Error GoTo 0AddControl = MaxControlMaxControl = MaxControl + 1End FunctionFunction PerWidth(pfrmIn As Form) As LongDim i As Longi = FindForm(pfrmIn)If i < 0 Theni = AddForm(pfrmIn)End IfPerWidth = (pfrmIn.ScaleWidth * 100) \ FormRecord(i).ScaleWidth End FunctionFunction PerHeight(pfrmIn As Form) As DoubleDim i As Longi = FindForm(pfrmIn)If i < 0 Theni = AddForm(pfrmIn)End IfPerHeight = (pfrmIn.ScaleHeight * 100) \ FormRecord(i).ScaleHeight End FunctionPublic Sub ResizeControl(inControl As Control, pfrmIn As Form)On Error Resume NextDim i As LongDim widthfactor As Single, heightfactor As SingleDim minFactor As SingleDim yRatio, xRatio, lTop, lLeft, lWidth, lHeight As LongyRatio = PerHeight(pfrmIn)xRatio = PerWidth(pfrmIn)i = FindControl(inControl, )If inControl.Left < 0 ThenlLeft = CLng(((ControlRecord(i).Left * xRatio) \ 100) - 75000) ElselLeft = CLng((ControlRecord(i).Left * xRatio) \ 100)End IflTop = CLng((ControlRecord(i).Top * yRatio) \ 100)lWidth = CLng((ControlRecord(i).Width * xRatio) \ 100)lHeight = CLng((ControlRecord(i).Height * yRatio) \ 100)If TypeOf inControl Is Line ThenIf inControl.X1 < 0 TheninControl.X1 = CLng(((ControlRecord(i).Left * xRatio) \ 100) - 75000)ElseinControl.X1 = CLng((ControlRecord(i).Left * xRatio) \ 100) End IfinControl.Y1 = CLng((ControlRecord(i).Top * yRatio) \ 100)If inControl.X2 < 0 TheninControl.X2 = CLng(((ControlRecord(i).Width * xRatio) \ 100) - 75000)ElseinControl.X2 = CLng((ControlRecord(i).Width * xRatio) \ 100) End IfinControl.Y2 = CLng((ControlRecord(i).Height * yRatio) \ 100) ElseinControl.Move lLeft, lTop, lWidth, lHeightinControl.Move lLeft, lTop, lWidthinControl.Move lLeft, lTopEnd IfEnd SubPublic Sub ResizeForm(pfrmIn As Form)Dim FormControl As ControlDim isVisible As BooleanDim StartX, StartY, MaxX, MaxY As LongDim bNew As BooleanIf Not bRunning ThenbRunning = TrueIf FindForm(pfrmIn) < 0 ThenbNew = TrueElsebNew = FalseEnd IfIf pfrmIn.Top < 30000 ThenisVisible = pfrmIn.VisibleOn Error Resume NextIf Not pfrmIn.MDIChild ThenOn Error GoTo 0' ' pfrmIn.Visible = FalseElseIf bNew ThenStartY = pfrmIn.HeightStartX = pfrmIn.WidthOn Error Resume NextFor Each FormControl In pfrmInIf FormControl.Left + FormControl.Width + 200 > MaxX ThenMaxX = FormControl.Left + FormControl.Width + 200End IfIf FormControl.Top + FormControl.Height + 500 > MaxY ThenMaxY = FormControl.Top + FormControl.Height + 500End IfIf FormControl.X1 + 200 > MaxX ThenMaxX = FormControl.X1 + 200End IfIf FormControl.Y1 + 500 > MaxY ThenMaxY = FormControl.Y1 + 500End IfIf FormControl.X2 + 200 > MaxX ThenMaxX = FormControl.X2 + 200End IfIf FormControl.Y2 + 500 > MaxY ThenMaxY = FormControl.Y2 + 500End IfNext FormControlOn Error GoTo 0pfrmIn.Height = MaxYpfrmIn.Width = MaxXEnd IfOn Error GoTo 0End IfFor Each FormControl In pfrmInResizeControl FormControl, pfrmIn Next FormControlOn Error Resume NextIf Not pfrmIn.MDIChild ThenOn Error GoTo 0pfrmIn.Visible = isVisibleElseIf bNew ThenpfrmIn.Height = StartYpfrmIn.Width = StartXFor Each FormControl In pfrmInResizeControl FormControl, pfrmIn Next FormControlEnd IfEnd IfOn Error GoTo 0End IfbRunning = FalseEnd IfEnd SubPublic Sub SaveFormPosition(pfrmIn As Form)Dim i As LongIf MaxForm > 0 ThenFor i = 0 To (MaxForm - 1)If FormRecord(i).Name = ThenFormRecord(i).Top = pfrmIn.TopFormRecord(i).Left = pfrmIn.LeftFormRecord(i).Height = pfrmIn.HeightFormRecord(i).Width = pfrmIn.WidthExit SubEnd IfNext iAddForm (pfrmIn)End IfEnd SubPublic Sub RestoreFormPosition(pfrmIn As Form)Dim i As LongIf MaxForm > 0 ThenFor i = 0 To (MaxForm - 1)If FormRecord(i).Name = ThenIf FormRecord(i).Top < 0 ThenpfrmIn.WindowState = 2ElseIf FormRecord(i).Top < 30000 ThenpfrmIn.WindowState = 0pfrmIn.Move FormRecord(i).Left, FormRecord(i).Top, FormRecord(i).Width, FormRecord(i).HeightElsepfrmIn.WindowState = 1End IfExit SubEnd IfNext iEnd IfEnd SubPublic Sub Resize_ALL(Form_Name As Form)Dim OBJ As ObjectFor Each OBJ In Form_NameResizeControl OBJ, Form_NameNext OBJEnd SubPublic Sub DragForm(frm As Form)On Local Error Resume NextCall ReleaseCaptureCall SendMessage(frm.hwnd, WM_NCLBUTTONDOWN, 2, 0) End Sub。

VC控件随窗口大小变化而变化的方法在VC中，控件随窗口大小变化而变化的方法有多种实现方式。

下面将介绍一种比较常用的方法。

方法一：使用控件的锚点属性3.根据需要，可以调整锚点的位置和大小。

4. 在对话框的OnSize函数中添加控件调整的代码。

示例代码如下：```void CMyDialog::OnSize(UINT nType, int cx, int cy)CDialogEx::OnSize(nType, cx, cy);//获取对话框的客户区大小CRect rect;GetClientRect(&rect);//调整控件的大小和位置m_btnOK.SetWindowPos(NULL, rect.right - 100, rect.bottom - 100, 0, 0, SWP_NOZORDER ， SWP_NOSIZE);```在这个示例代码中，m_btnOK是一个按钮控件的变量。

调用SetWindowPos函数可以设置控件的位置和大小。

rect.right和rect.bottom分别表示对话框客户区的右边界和底边界的坐标。

在此示例中，按钮的右下角离对话框的右下角保持了100个像素的距离。

需要注意的是，OnSize函数中必须调用基类的OnSize函数，以确保窗口的基本布局正常。

总结：使用锚点属性和OnSize函数可以实现控件随窗口大小变化而变化。

通过设置锚点的位置和大小，再在OnSize函数中根据对话框的大小调整控件的大小和位置，可以适应不同窗口大小的需求。

这种方法是比较简单、快速实现的方式，特别适用于需要调整的控件数量较少的情况。

除了使用锚点属性和OnSize函数外，还可以使用其他方式实现控件随窗口大小变化，比如使用MoveWindow函数或者使用布局管理器等。

在实际开发中，需要根据具体情况选择合适的方法。

如何实现控件大小的自动缩放？当我的仪器面板使用宽屏的显示器时，面板可以达到全屏显示，但是各控件的大小却保持原来的大小。

也就是说我调整面板的大小时，各控件大小并不能按照比例来缩放。

以前一直都没有注意到这个问题，今天才突然发现，请问我该怎么解决这个问题，达到面板和控件大小的同步缩放？hhhhhhhhhhhhh.JPG(36.19 KB, 下载次数: 7)面板放大，但各控件还是保持原来的大小。

做一个灵活而美观的界面需要考虑用户操作情况、不同操作系统以及用户屏幕的分辨率等问题。

第一种比较偷懒的办法是将窗口（也就是CVI中的panel）的other Attributes中的sizable、Can Maximize属性设为假，使用户不能改变窗体的形状；第二种方法比较复杂，但却比较灵活：（1）调用DisplayPanel ()函数前，先获取用户屏幕的分辨率：GetScreenSize（）；（2）在panel的EVENT_PANEL_SIZE事件中使用SetCtrlAttrubte()函数重新调整个控件的大小和位置；（3）第（2）步中一种做法是考虑几种比较典型的分辨率设置（如800*600，1600*1200等），将面板预设成相应大小，在各种大小的分辨率下重新分布各控件。

当用户改变窗体大小时，将各控件的属性重新设置一下即可（此方法须将sizable属性设为假，用户只能在窗体最小化，正常和最大化这三种状态之间选择）；（4）第（2）步中的另一种方法是当用户调整窗体大小时，使各空间的位置和大小呈比例缩放（此方法无需将sizable属性设为假，用户可用鼠标拖动改变窗体大小）。

补充一下：获取显示器属性也可以使用以下函数：GetMonitorFromPanel (Main, monitor);//获得显示器IDGetMonitorAttribute (monitor, ATTR_HEIGHT, height);//得到高度GetMonitorAttribute (monitor, ATTR_WIDTH, width);//得到宽度多谢版主指导，按照您说的，我先试着用：GetCtrlAttribute (panelHandle,PANEL_OK , ATTR_WIDTH,&i );SetCtrlAttribute (panelHandle,PANEL_OK , ATTR_WIDTH,i*2 );GetCtrlAttribute (panelHandle,PANEL_OK , ATTR_HEIGHT,&n );SetCtrlAttribute (panelHandle,PANEL_OK , ATTR_HEIGHT,n*2);来改变一个控件的长和宽，2是我加的缩放比例，也就是说2要用面板的缩放比例来代替。

Qt Creator 窗体控件自适应窗口大小布局常见的软件窗口大小改变（最大化、手动改变时）需要窗口的部件能够自适应布局，而在Qt的应用程序界面设计中，对于像我一样的初学者如何实现窗口自适应调整还是要绕点弯路的。

网上百度了很多，多数说的很含糊，还有很多是用程序实现的，既然已经有Qt Creator那么高集成度的工具了，我还是倾向于直接在Qt Creator中通过可视化配置的方式完成，一是所见即所得，而是效率要高不少。

Qt中如果想实现窗体内空间随着窗体大小调整，必须使用布局管理，常用的布局管理有QHBoxLayout、QVBoxLayout、QGridLayout，空的地方使用spacer 控件进行填充，因此首先将窗体空间使用布局管理典型应用如下图所示。

我这里使用QGridLayout，按住Ctrl多选需要布局的窗体控件，右键-布局-栅格化局，根据需要进行调整。

要想是控件根据窗体进行调整，最为重要的一点就是设置窗口部件的大小策略，各控件均有这一项设置，如下图所示。

这部分具体的参数解释摘录如下：结合控件的SizePolicy属性，来控制布局管理中的控件的尺寸自适应方式。

控件的sizePolicy说明控件在布局管理中的缩放方式。

Qt提供的控件都有一个合理的缺省sizePolicy，但是这个缺省值有时不能适合所有的布局，开发人员经常需要改变窗体上的某些控件的sizePolicy。

一个QSizePolicy的所有变量对水平方向和垂直方向都适用。

下面列举了一些最长用的值：A. Fixed：控件不能放大或者缩小，控件的大小就是它的sizeHint。

B. Minimum：控件的sizeHint为控件的最小尺寸。

控件不能小于这个sizeHint，但是可以放大。

C. Maximum：控件的sizeHint为控件的最大尺寸，控件不能放大，但是可以缩小到它的最小的允许尺寸。

D. Preferred：控件的sizeHint是它的sizeHint，但是可以放大或者缩小E. Expandint：控件可以自行增大或者缩小注：sizeHint（布局管理中的控件默认尺寸，如果控件不在布局管理中就为无效的值）所以对于需要根据窗口大小对应改变的部件我这里就设置为Expandint。

widget跟随窗口调整
UI界面控件随窗口自适应变化大小
通过Qt Creator的设计模式实现，无需增加代码。

如下图，实现对最下层tableview大小跟随窗口调整：
1、界面空白处右击，选择布局-->栅格布局，这会使centralWidget布局设置为GridLayout。

然后界面中的部件会自动添加到栅格布局中，此时的部件会根据窗口大小自动调整大小。

2、但是部件的大小却不是我们希望的，极不协调，接下来就需要调整每个控件的设置。

调整控件Size的项目包括：sizePolicy、minimumSize、maxmumSize
比如将上面的第三行的lineEdit限制高度：
这样，在调整窗口大小的时候，lineEdit控件只能任意改变宽度，而高度则被限制在30个像素内。

（调整之后效果）
注意：
有些情况下设置了上面的操作步骤之后，但似乎没有起作用。

比如上面例子中第一行的几个空间，虽然设置了sizePolicy以及宽度、高度限制，但是还是随着界面改变。

这个时候，就需要添加 Spacer(看起来像弹簧的控件)，之后就能解决问题了。

这是因为GridLayout布局的影响，他必须让布局之内的区域布满控件，而不能有空白，所以即使设置了大小限制，仍然会被拉伸。

添加Spacer就是为了填充多余的区域。

Delphi 窗口宽度自适应 Grid 是一种实用工具，用于帮助设计师调整和
自动调整 Delphi 窗口的宽度，以适应不同的屏幕尺寸，并且可以自由
调整其宽度，以达到最佳的视觉显示效果。

它支持所有主流的操作系统，可用于 Windows 上的 Delphi 开发环境。

Delphi 窗口宽度自适应 Grid 的工作原理是我们利用 Delphi 编程语言，自定义一个脚本解析器，来解析Delphi视窗格式文件中布局信息，并
根据不同的宽度大小动态对窗口进行缩放处理，从而实现其宽度的自
适应top。

Delphi 窗口宽度自适应 Grid 的实施步骤如下：
1.在项目中添加一个新的单元，并将其命名为“AdaptGrid”。

2.当让用户输入窗口尺寸时，调用“AdaptGrid”函数，根据输入的宽度
来调整窗口的大小，并使不同部件调整到合适的位置上。

3.根据用户输入的宽度，分析对应的布局信息，并建立适用的布局格式，以便在不同尺寸下重新定位相应控件。

4.将窗口尺寸重新绘制，以适应不同尺寸的屏幕，实现宽度自适应。

5.按照项目要求，重绘多余的部件，调整不必要控件，并最终实现窗口宽度自适应 Grid 的目标。

Delphi 窗口宽度自适应 Grid 是一款实用的工具，可用于为不同屏幕尺
寸的用户调节应用程序的宽度，使其看起来更加美观，并可以根据需
要来调整宽度，以便实现最佳的屏幕显示效果。

如果你想用一种简便而且可靠的方式来实现窗口宽度自适应，Delphi 窗口宽度自适应 Grid 无疑是最佳的选择。

C# WinForm窗体及其控件的自适应C# WinForm窗体及其控件自适应各种屏幕分辨率一。

说明我们自己编写程序的界面，会遇到各种屏幕分辨率，只有自适应才能显的美观。

实际上，做到这点也很简单，就是首先记录窗体和它上面控件的初始位置和大小，当窗体改变比例时，其控件的位置和大小也按此比例变化即可。

因为窗体上控件的位置和大小是相对于自己所在的窗体的，也就是所谓的窗口坐标。

在这里我们只考虑相对于自己窗体的窗口坐标更简单，也就是成比例变化。

为了多个窗体共用，我在这里创建一个类AutoSizeFormClass ，１.使用它去记录窗体和其控件的初始位置和大小，２.根据窗体变化了的大小，成比例地实现其控件的水平和垂直方向的变化，也就是自适应。

二。

使用方法使用方法很简单，１.把自适应的类整体复制到你的工程命名空间里，然后在需要自适应的窗体中做３步即可：２.声明自适应类实例。

３.为窗体添加Load事件，并在其方法Form1_Load中，调用类的初始化方法，记录窗体和其控件初始位置和大小４.为窗体添加SizeChanged事件，并在其方法Form1_SizeChanged中，调用类的自适应方法，完成自适应三。

完整代码如下：（一）。

自适应窗体的代码：using System;using System.Collections.Generic;using ponentModel;using System.Data;using System.Drawing;using System.Text;using System.Windows.Forms;namespace WindowsApplication1{public partial class Form1 : Form{//1.声明自适应类实例AutoSizeFormClass asc = new AutoSizeFormClass();public Form1(){InitializeComponent();}//2. 为窗体添加Load事件，并在其方法Form1_Load中，调用类的初始化方法，记录窗体和其控件的初始位置和大小private void Form1_Load(object sender, EventArgs e){asc.controllInitializeSize(this);}//3.为窗体添加SizeChanged事件，并在其方法Form1_SizeChanged中，调用类的自适应方法，完成自适应private void Form1_SizeChanged(object sender, EventArgs e){asc.controlAutoSize(this);}}}（二）。

Wpf控件⼤⼩随着窗⼝改变⽽变化利⽤WPF中的ViewBox容器空间。

ViewBox是⼀个容器空间，它会⾃动缩放容器中的⼦空间以填满⾃⾝，同时它只能有⼀个⼦控件。

不过，我们可以把Canvas控件作为ViewBox控件的⼦控件。

然后在Canvas控件中布局其他的控件。

<Window x:Class="Window1" xmlns="" xmlns:x="" Title="WPFTest" mc:Ignorable="d" xmlns:d="" xmlns:mc="/markup-compatibility/2006" SizeToContent="Manual" Width="400" Height="300">////////////////////////////////////////////////////////////////////////////////////////////// <Viewbox Name="Viewbox1" Stretch="Fill"> <Canvas Height="200" Name="Canvas1" Width="300" Background="#FF8EDE75"> <Button Canvas.Left="43" Canvas.Top="40" Content="Button" Height="37" Name="Button1" Width="87" /> </Canvas> </Viewbox>///////////////////////////////////////////////////////////////////////////////////////////// ViewBox控件：容器控件，⾃动填充DockPanel剩余的控件。

VB 控件随窗口大小改变一个好的Windows应用程序的界面，自适应窗体尺寸改变的能力是必不可少的。

笔者在这方面做了一些探讨，希望能对VB编程爱好者提供一些启发和帮助。

凡用过VB编写Windows应用程序的用户都可能有过这样的经历:当一个经过精心设计的应用程序运行后，如果用户重新调整了窗体的大小，则控制在窗体中的相对位置、控件与窗体的大小比例均会严重失调，程序的界面变得面目全非。

1、按照窗体尺寸缩放比例自动调整控件在窗体中的相对位置控件在窗体中的位置由该控件的Left和Top属性确定。

程序启动后如果窗体被缩放，只要按照缩放的比例来重新调整窗体内各控件的Left和Top属性值即可。

所以根据上面介绍的原理，在窗体被缩放之后，只要按照下面的关系来设置控件的Left和Top属性值即可。

调整后控件的Left属性值=(控件原Left属性值/窗体原Left属性值)*窗体.ScaleWidth；调整后控件的Top属性值=(控件原Top属性值/窗体原Top属性值)*窗体.ScaleHeight；2、按照窗体尺寸缩放比例自动调整控件的大小窗体和控件的大小由窗体和控件的Width属性和Height属性确定。

所以当用户界面设计完成之后，窗体及其内部的各控件的Width, Height属性便随之确定下来；从而窗体相对于每一个控件，它们的宽度之比、高度之比均被确定。

如果窗体Forml内的一个文本框Text1的宽(即Text1的Width属性值)为3610，高度(即Text1的Height属性值)为1935;而窗体Form1的上述两个值分别为4890和3615，则它们的宽度之比和高度之比分别为：361014890、193513615。

当用户在程序启动后调整了窗体的尺寸，窗体的宽度和高度将分别为Form1.ScaleWidth，Form1.ScaleHeight；此时应该按上述比例来调整文本框Textl的的高度和宽度值。

即：(调整后的Text1的Width属性值)/( Form1.ScaleWidth)=3610/4890；(调整后的Text1的Height属性值)/(Form1.Scale-Height)=1935/3615；所以调整后的Text1的Width属性值=(3610/4890)* Form1.ScaleWidth；调整后的Text1的Height属性值=(1935/3615) * Form1.ScaleHeight；对于一般控件来说，应该有：调整后的控件的Width属性值=(控件原Width属性值/窗体原Width属性值)*窗体.ScaleWidth调整后的控件的Height属性值=(控件原Height属性值/窗体值/窗体原Height属性值)*窗体.ScaleHeight按照上述方法确定窗体缩放后控件Width和Height属性值，则当窗体尺寸被调整后，控件的大小将按比例得到相应的调整。

QtCreator窗体控件⾃适应窗⼝⼤⼩布局常见的软件窗⼝⼤⼩改变（最⼤化、⼿动改变时）需要窗⼝的部件能够⾃适应布局，⽽在Qt的应⽤程序界⾯设计中，对于像我⼀样的初学者如何实现窗⼝⾃适应调整还是要绕点弯路的。

⽹上百度了很多，多数说的很含糊，还有很多是⽤程序实现的，既然已经有Qt Creator那么⾼集成度的⼯具了，我还是倾向于直接在Qt Creator中通过可视化配置的⽅式完成，⼀是所见即所得，⽽是效率要⾼不少。

Qt中如果想实现窗体内空间随着窗体⼤⼩调整，必须使⽤布局管理，常⽤的布局管理有QHBoxLayout、QVBoxLayout、QGridLayout，空的地⽅使⽤spacer控件进⾏填充，因此⾸先将窗体空间使⽤布局管理典型应⽤如下图所⽰。

我这⾥使⽤QGridLayout，按住Ctrl多选需要布局的窗体控件，右键-布局-栅格化局，根据需要进⾏调整。

要想是控件根据窗体进⾏调整，最为重要的⼀点就是设置窗⼝部件的⼤⼩策略，各控件均有这⼀项设置，如下图所⽰。

这部分具体的参数解释摘录如下：结合控件的SizePolicy属性，来控制布局管理中的控件的尺⼨⾃适应⽅式。

控件的sizePolicy说明控件在布局管理中的缩放⽅式。

Qt提供的控件都有⼀个合理的缺省sizePolicy，但是这个缺省值有时不能适合所有的布局，开发⼈员经常需要改变窗体上的某些控件的sizePolicy。

⼀个QSizePolicy的所有变量对⽔平⽅向和垂直⽅向都适⽤。

下⾯列举了⼀些最长⽤的值：A. Fixed：控件不能放⼤或者缩⼩，控件的⼤⼩就是它的sizeHint。

B. Minimum：控件的sizeHint为控件的最⼩尺⼨。

控件不能⼩于这个sizeHint，但是可以放⼤。

C. Maximum：控件的sizeHint为控件的最⼤尺⼨，控件不能放⼤，但是可以缩⼩到它的最⼩的允许尺⼨。

D. Preferred：控件的sizeHint是它的sizeHint，但是可以放⼤或者缩⼩E. Expandint：控件可以⾃⾏增⼤或者缩⼩注：sizeHint（布局管理中的控件默认尺⼨，如果控件不在布局管理中就为⽆效的值）所以对于需要根据窗⼝⼤⼩对应改变的部件我这⾥就设置为Expandint。

VB如何使控件位置和大小自动适应窗体变化的三种不同模式在VB中，可以使用三种不同的模式来使控件的位置和大小自动适应窗体的变化。

这三种模式分别是锚定模式、停靠模式和流式布局。

下面将对这三种模式进行详细介绍。

1. 锚定模式（Anchoring Mode）：锚定模式是指通过设定控件的锚点，使其在窗体大小发生变化时保持相对位置不变。

具体而言，可以为每个控件设定一个或多个锚点（Left、Right、Top、Bottom），当窗体的大小发生变化时，控件会根据设定的锚点自动调整位置和大小。

在VB中，可以通过以下步骤来设定控件的锚点：1)在窗体设计器中选择需要设定锚点的控件；2) 在属性窗口中找到Anchor属性，设置锚点的组合，可以通过组合使用4个方向的锚点来实现更灵活的控件调整。

锚定模式的优点是使用简单，适用于一些简单的界面布局，但是对于复杂的界面布局来说，可能需要设定大量的锚点，导致布局复杂，不易维护。

2. 停靠模式（Docking Mode）：停靠模式是指将控件固定在窗体的指定位置，当窗体的大小发生变化时，控件会自动调整大小和位置，保持与窗体边缘之间的固定距离。

在VB中，可以通过以下步骤来设定控件的停靠模式：1)在窗体设计器中选择需要设定停靠模式的控件；2) 在属性窗口中找到Dock属性，设置为需要停靠的位置（Top、Bottom、Left、Right、Fill）。

停靠模式的优点是使用简单，适用于一些需要将控件固定在窗体边缘的布局，但对于一些需要灵活调整位置的布局来说，可能会受到限制。

3. 流式布局（Flow Layout）：流式布局是指将控件按照一定的顺序依次排列，并在窗体大小变化时自动调整控件的位置和大小，以适应变化后的窗体大小。

在VB中，可以通过以下步骤来使用流式布局：1) 使用FlowLayoutPanel控件作为容器控件，在该容器中添加需要排列的控件；2) 设置FlowLayoutPanel的FlowDirection属性为需要的方向（Horizontal、Vertical）；3) 设置FlowLayoutPanel的WrapContents属性为True，使得控件会自动换行排列；4) 设置FlowLayoutPanel的AutoSize属性为True，使得容器会自动调整大小以适应控件的大小变化。

MFC窗口和控件大小同时变化第一步：当然要首先设置当前对话框属性为可拖动大小变化的即Resizing属性第二步：定义一个CList类对象，用于将所有的控件坐标存储在链表中。

CList<CRect,CRect>listRect;第三步：初始化函数中添加在初始化窗口中最后添加:CRectrectWnd;GetWindowRect(&rectWnd);//得到当前窗口（对话框）的坐标listRect.AddTail(&rectWnd);//将坐标添加到链表listRect的末尾（注意是CList<CRect,CRect>listRect;类的成员变量）CWnd *pWndChild=GetWindow(GW_CHILD);//while (pWndChild)//依次得到对话框上控件的坐标，并将所有的控件坐标存储在链表中{pWndChild->GetWindowRect(&rectWnd);listRect.AddTail(&rectWnd);//由于依次将控件坐标添加到链表末尾，所以开头的坐标是对话框的坐标pWndChild=pWndChild->GetNextWindow();}第四步：添加WM_SIZE消息响应函数：void CDevicePage::OnSize(UINT nType, int cx, int cy){CDialog::OnSize(nType, cx, cy);if (listRect.GetCount()>0)//看链表是否为空{CRectrectDlgNow;GetWindowRect(&rectDlgNow);//得到当前对话框的坐标POSITION mp=listRect.GetHeadPosition();//取得存储在链表中的头元素，其实就是前边的对话框坐标CRectrectDlgSaved;rectDlgSaved=listRect.GetNext(mp);ScreenToClient(rectDlgNow);floatfRateScaleX=(float)(rectDlgNow.right-rectDlgNow.left)/(rectDlgSaved.right-r ectDlgSaved.left);//拖拉后的窗口大小与原来窗口大小的比例floatfRateScaleY=(float)(rectDlgNow.bottom-rectDlgNow.top)/(rectDlgSaved.bot tom-rectDlgSaved.top);ClientToScreen(rectDlgNow);CRectrectChildSaved;CWnd *pWndChild=GetWindow(GW_CHILD);while (pWndChild){rectChildSaved=listRect.GetNext(mp);rectChildSaved.left=rectDlgNow.left+(int)((rectChildSaved.left-rectDlgSaved. left)*fRateScaleX);rectChildSaved.top=rectDlgNow.top+(int)((rectChildSaved.top-rectDlgSaved. top)*fRateScaleY);rectChildSaved.right=rectDlgNow.right+(int)((rectChildSaved.right-rectDlgSa ved.right)*fRateScaleX);rectChildSaved.bottom=rectDlgNow.bottom+(int)((rectChildSaved.bottom-r ectDlgSaved.bottom)*fRateScaleY);ScreenToClient(rectChildSaved);pWndChild->MoveWindow(rectChildSaved);pWndChild = pWndChild->GetNextWindow();}}Invalidate(); //强制重绘窗口}。

VC中自动改变控件位置和大小的对话框类在用VC开发应用程序时，经常会要做一些可以改变大小的对话框，而这个时候就要求对话框上的控件会随着对话框大小的改变而改变自己的位置和大小。

如果控件比较少，那可以在对话框的O nSize()事件里面添加代码，通过计算来调整各个控件的位置和大小；但是，如果对话框上的控件比较多的话，那这将是一件非常痛苦的事情！要是程序中又有很多可以改变大小的对话框，那一个一个的OnSize()写下来，那会使程序员崩溃的！为了解决这个问题，我写了一个自动改变控件位置和大小的对话框类ClxDialog。

从这个类继承的对话框类，只要在OnInitDialog()里对控件做一些简单的设置，对话框上的控件就会随着对话框大小的改变而改变自己的位置和大小（当然，别忘了把对话框的Border属性改为Resizing）。

为了保存控件信息，我定义了一个结构：typedef struct _dlgControlTag{int iId; // 控件IDint iFlag; // 标志，表示怎样改变控件的位置或者大小int iPercent; // 改变值占对话框改变值的百分比} DLGCTLINFO, *PDLGCTLINFO;这里要对结构中的iFlag和iPercent进行一些解释。

其中iFlag是下面的枚举值：enum{MOVEX = 0, // 控件在X方向（左右）移动MOVEY, // 控件在Y方向（上下）移动MOVEXY, // 控件在X方向和Y方向同时移动ELASTICX, // 控件在X方向（宽度）改变大小ELASTICY, // 控件在Y方向改（高度）改变大小ELASTICXY // 控件在X方向和Y方向同时改变大小};iPercent表示改变值占对话框改变值的百分比。

例如，一个控件的iPercent值为100，i Flag值为MOVEX，那么当对话框的宽度改变100个单位的时候，这个控件就在X方向移动100个单位；又如，一个控件的iPercent值为100，iFlag值为ELASTICXY，那么当对话框的宽度和高度分别改变100个单位的时候，控件的高度和宽度也相应的改变100个单位。

MFC:如何让对话框中的控件和对话框一起变小变大默认分类2009-11-16 17:44:35 阅读409 评论4 字号：大中小订阅MFC:如何让对话框中的控件和对话框一起变小变大(2009-07-01 16:23:02)标签：电脑对话框mfc控件wm_size onsize()it分类：C/C++/VC 一个基于对话框的MFC界面，怎么样才能让对话框里的控件能和对话框同比例变小变大？今天我一直想解决这个问题，这是师姐留给我的任务。

经过在网上的大量搜素，终于找到了解决方法，其实比较简单。

一般情况下，我们新建的对话框，里面的“确定”和：取消”按钮，在对话框最大化得时候，不会一起变大的，而是保持原来的大小。

最简单的情况：当我们点击最大化按钮的时候，对话框会最大化，但是控件“确定”和“取消”不会跟着变大。

如果我们在对话框上面有多少控件，那么会很丑，而且很不实用，最大化本来就是想看的更清楚嘛。

我们可以采取下面的措施：对话框也是窗口，最大化是对窗口大小的改变，而在windows message handle中有个WM_SIZE的消息，该消息在窗口大小发生变化的时候会产生。

那么我们可以根据这个消息，在窗口大小发生变化的时候，利用MoveWindow()函数来重新设置各个控件的大小。

还是以上面最简单的情况为例子：1 首先要知道对话框大小是否改变，改变了多少，我们应该记录当前对话框的大小。

在对话框类中添加成员变量CRect m_rect 他是用来记录当前对话框的大小。

我们在OnInitDialog()函数中获取对话框创建时的大小：GetClientRect(&m_rect);2 增加消息WM_SIZE的消息响应函数OnSize():只要对话框大小发生变化，就会调用该函数。

3 在OnSize()函数中增加如下代码：（最简单的为例子，就一个确定按钮和取消按钮）void CTestDlg::OnSize(UINT nType, int cx, int cy){CDialog::OnSize(nType, cx, cy);// TODO: Add your message handler code herefor (int i=1;i<=2;i++) //因为是两个控件，所以这里用了循环{CWnd *pWnd;pWnd = GetDlgItem(i); //获取ID为i的空间的句柄，因为“确认”ID为1，“取消”ID为2 if(pWnd) //判断是否为空，因为对话框创建时会调用此函数，而当时控件还未创建{CRect rect; //获取控件变化前的大小pWnd->GetWindowRect(&rect);ScreenToClient(&rect//将控件大小转换为在对话框中的区域坐标//cx/m_rect.Width()为对话框在横向的变化比例rect.left=rect.left*cx/m_rect.Width();//调整控件大小rect.right=rect.right*cx/m_rect.Width();rect.top=rect.top*cy/m_rect.Height();rect.bottom=rect.bottom*cy/m_rect.Height();pWnd->MoveWindow(rect);//设置控件大小}}GetClientRect(&m_rect);// 将变化后的对话框大小设为旧大小}然后运行，当对话框最大化的时候，两个按钮也变大了。

matlabgui控件随父控件变大而变大摘要：1.MATLAB GUI 简介2.父控件与子控件的关系3.实现子控件随父控件变大的方法4.总结正文：一、MATLAB GUI 简介MATLAB GUI（Graphical User Interface）是一种基于MATLAB 语言的图形用户界面设计工具，用户可以通过拖拽式的方式快速构建应用程序。

在MATLAB GUI 中，控件是构成界面的基本元素，包括按钮、文本框、复选框等。

二、父控件与子控件的关系在MATLAB GUI 中，控件可以分为父控件和子控件。

父控件是指包含其他控件的控件，而子控件是指被包含在其他控件中的控件。

父控件和子控件之间的关系可以用层次结构来表示。

在界面设计中，我们常常需要实现子控件随着父控件的尺寸变化而自动调整尺寸的功能，以保持界面的美观和操作的便捷。

三、实现子控件随父控件变大的方法要实现子控件随父控件变大，可以采用以下方法：1.使用`回调函数`：在MATLAB GUI 中，可以为控件添加回调函数，当控件的尺寸发生变化时，回调函数会被自动调用。

我们可以在回调函数中编写调整子控件尺寸的代码，从而实现子控件随父控件变大的效果。

2.使用`set`函数：`set`函数可以用于设置控件的属性，包括尺寸、位置等。

通过在父控件的回调函数中调用`set`函数，可以实现子控件尺寸随父控件变化的效果。

3.使用`uigridlayout`：`uigridlayout`是MATLAB GUI 中的一种布局方式，可以方便地实现子控件在父控件中的自动排列。

通过设置`uigridlayout`的属性，可以实现子控件随父控件变大的效果。

四、总结在MATLAB GUI 中，实现子控件随父控件变大的方法有多种，包括使用回调函数、`set`函数和`uigridlayout`等。

在实际应用中，可以根据具体的需求和场景选择合适的方法。

如何让控件随窗口大小自动调整位置和尺寸/ypxmaomao/blog/item/7294b8809a2833df9023d960.html2009年03月26日星期四15:46最笨的方法大概就是OnSize中按照新旧大小的比例算一下然后MoveWindow我在实际过程中碰见一个问题就是调整Crichedit时出错，后来才知道WM_SIZE执行在WM_CREATE前面. 所以调整Crichedit时要加判断条件if (IsWindow(m_testrich2.GetSafeHwnd())){m_testrich2.MoveWindow(crect,true);}--------------------------最后贴一下我的工程中部分代码-----------------------void CT alkDlg::OnSize(UINT nType, int cx, int cy){CRect crect;crect.left=5;crect.right=cx-117;crect.top=(300*cy)/410+2;//这些按照原先的比例计算出新的大小crect.bottom=cy-30;if (IsWindow(m_testrich.GetSafeHwnd()))//调整输入框{ //m_testrich.ShowWindow(SW_HIDE);m_testrich.MoveWindow(crect,true);}crect.top=5;crect.bottom=(300*cy)/410-24-2;if (IsWindow(m_testrich2.GetSafeHwnd()))//调整显示框{// m_testrich2.ShowWindow(SW_HIDE);m_testrich2.MoveWindow(crect,true);}crect.left=cx-175;crect.top=cy-28;crect.bottom=cy-5;crect.right=cx-117;m_btSend.MoveWindow(crect,true);//调整发送按钮crect.left=cx-175-80;crect.right=cx-117-80;m_close.MoveWindow(crect,true);//调整关闭按钮crect.top=(300*cy)/410-24;crect.bottom=(300*cy)/410;crect.right=cx-117-80+3;m_fstp.MoveWindow(crect,true);//调整发送图片按钮...........略=============================================================== =========方法2，使用别人写的类（我下了，还没用过，有需要的朋友如果下不了，可以留邮箱向我要）/source/1070512使用时，将其中的ControlPos.cpp和ControlPos.h文件引入工程中然后根据以下步骤进行操作：1：在需要处理的对画框的类定义中,定义一个操作对象(别忘了包含头文件ControlPos.h)class CYourDlg: public CDialog{............CControlPos m_cControlPos;}2：在该对话框的OnInitDialog中添加如下代码m_cControlPos.SetParent(this);3：接下来为每个要改变大小、位置的控件进行注册（自己编的词）m_cControlPos.AddControl(IDC_BUTTON1,CP_MOVE_HORIZONTAL) //使控件IDC_BUTTON1根据窗体大小的改变自动水平移动（其他样式见最后的“样式控制表”）4：最后，在该对话框的OnSize事件处理函数中添加如下代码：m_cControlPos.MoveControls();控制样式表：（4种样式可以任意组合）CP_MOVE_VERTICAL //垂直移动CP_MOVE_HORIZONTAL //水平移动CP_RESIZE_HORIZONTAL //改变宽度CP_RESIZE_VERTICAL //改变高度。

QtDesigner修改窗体⼤⼩改变控件位置⼀.新建⼀个窗体⽤qt designer 新建⼀个QWidget窗体，在窗体中右键选择布局，发现布局是选择不了的，这个是因为窗体⾥⾯没有添加控件，任意添加空间后便可选择右键-- 布局-- ⽔平布局/垂直布局等⼆. 添加控件我们添加⼀个group box 控件，然后右键选择布局 -- 垂直布局在添加⼀个horizontalLayout，再给horizontalLayout⾥⾯添加两个button按钮向group box ⾥⾯添加⼀个label 和 botton然后在group box 的⾥⾯选择右键 -- 布局 -- ⽔平布局三. 添加spacers效果我们给group box ⾥⾯的两个控件直接添加⼀个horizontalSpacer给group box 和horizontalLayout 直接添加⼀个verticalSpacer在这⾥说明下spacers 缩放类型 sizeTypeExpanding ：可⾃⾏增⼤和收缩Fixed：不能放⼤或缩⼩Minimum：不能⼩于sizeHint尺⼨，可放⼤（若设置了最⼤尺⼨）Maximum：不能放⼤，可缩⼩到允许的最⼩尺⼨（若setMinimumSize(10,10)只能缩⼩到（10，10））Preferred：控件的sizeHint是他的Hint,可以放⼤或缩⼩四. ⽣成ui与pyspacersLayouts.ui⽂件：1<?xml version="1.0" encoding="UTF-8"?>2<ui version="4.0">3<class>Form</class>4<widget class="QWidget" name="Form">5<property name="geometry">6<rect>7<x>0</x>8<y>0</y>9<width>518</width>10<height>429</height>11</rect>12</property>13<property name="windowTitle">14<string>Form</string>15</property>16<layout class="QVBoxLayout" name="verticalLayout">17<item>18<widget class="QGroupBox" name="groupBox">19<property name="minimumSize">20<size>21<width>0</width>22<height>100</height>23</size>24</property>25<property name="maximumSize">26<size>27<width>16777215</width>28<height>200</height>29</size>30</property>31<property name="title">32<string>分组</string>33</property>34<layout class="QHBoxLayout" name="horizontalLayout"> 35<item>36<widget class="QLabel" name="label">37<property name="text">38<string>左侧</string>39</property>40</widget>41</item>42<item>43<spacer name="horizontalSpacer_2">44<property name="orientation">45<enum>Qt::Horizontal</enum>46</property>47<property name="sizeHint" stdset="0">48<size>49<width>40</width>50<height>20</height>51</size>52</property>53</spacer>54</item>55<item>56<widget class="QPushButton" name="pushButton_2"> 57<property name="text">58<string>右侧</string>59</property>60</widget>61</item>62</layout>63</widget>64</item>65<item>66<spacer name="verticalSpacer">67<property name="orientation">68<enum>Qt::Vertical</enum>69</property>70<property name="sizeType">71<enum>QSizePolicy::Expanding</enum>72</property>73<property name="sizeHint" stdset="0">74<size>75<width>20</width>76<height>100</height>77</size>78</property>79</spacer>80</item>81<item>82<layout class="QHBoxLayout" name="horizontalLayout_2"> 83<property name="spacing">84<number>6</number>85</property>86<item>87<spacer name="horizontalSpacer">88<property name="orientation">89<enum>Qt::Horizontal</enum>90</property>91<property name="sizeHint" stdset="0">92<size>93<width>40</width>94<height>20</height>95</size>96</property>97</spacer>98</item>99<item>100<widget class="QPushButton" name="pushButton_3"> 101<property name="text">102<string>确定</string>103</property>104</widget>105</item>106<item>107<widget class="QPushButton" name="pushButton_4"> 108<property name="text">109<string>取消</string>110</property>111</widget>112</item>113</layout>114</item>115</layout>116</widget>117<resources/>118<connections/>119</ui>⽣成的spacersLayouts.py ⽂件1# -*- coding: utf-8 -*-23# Form implementation generated from reading ui file 'spacersLayouts.ui'4#5# Created: Tue Mar 03 15:44:16 20156# by: PyQt4 UI code generator 4.10.37#8# WARNING! All changes made in this file will be lost!910from PyQt4 import QtCore, QtGui1112try:13 _fromUtf8 = QtCore.QString.fromUtf814except AttributeError:15def _fromUtf8(s):16return s1718try:19 _encoding = QtGui.QApplication.UnicodeUTF820def _translate(context, text, disambig):21return QtGui.QApplication.translate(context, text, disambig, _encoding)22except AttributeError:23def _translate(context, text, disambig):24return QtGui.QApplication.translate(context, text, disambig)2526class Ui_Form(object):27def setupUi(self, Form):28 Form.setObjectName(_fromUtf8("Form"))29 Form.resize(518, 429)30 self.verticalLayout = QtGui.QVBoxLayout(Form)31 self.verticalLayout.setObjectName(_fromUtf8("verticalLayout"))32 self.groupBox = QtGui.QGroupBox(Form)33 self.groupBox.setMinimumSize(QtCore.QSize(0, 100))34 self.groupBox.setMaximumSize(QtCore.QSize(16777215, 200))35 self.groupBox.setObjectName(_fromUtf8("groupBox"))36 self.horizontalLayout = QtGui.QHBoxLayout(self.groupBox)37 self.horizontalLayout.setObjectName(_fromUtf8("horizontalLayout"))38 bel = QtGui.QLabel(self.groupBox)39 bel.setObjectName(_fromUtf8("label"))40 self.horizontalLayout.addWidget(bel)41 spacerItem = QtGui.QSpacerItem(40, 20, QtGui.QSizePolicy.Expanding, QtGui.QSizePolicy.Minimum)42 self.horizontalLayout.addItem(spacerItem)43 self.pushButton_2 = QtGui.QPushButton(self.groupBox)44 self.pushButton_2.setObjectName(_fromUtf8("pushButton_2"))45 self.horizontalLayout.addWidget(self.pushButton_2)46 self.verticalLayout.addWidget(self.groupBox)47 spacerItem1 = QtGui.QSpacerItem(20, 100, QtGui.QSizePolicy.Minimum, QtGui.QSizePolicy.Expanding)48 self.verticalLayout.addItem(spacerItem1)49 self.horizontalLayout_2 = QtGui.QHBoxLayout()50 self.horizontalLayout_2.setSpacing(6)51 self.horizontalLayout_2.setObjectName(_fromUtf8("horizontalLayout_2"))52 spacerItem2 = QtGui.QSpacerItem(40, 20, QtGui.QSizePolicy.Expanding, QtGui.QSizePolicy.Minimum)53 self.horizontalLayout_2.addItem(spacerItem2)54 self.pushButton_3 = QtGui.QPushButton(Form)55 self.pushButton_3.setObjectName(_fromUtf8("pushButton_3"))56 self.horizontalLayout_2.addWidget(self.pushButton_3)57 self.pushButton_4 = QtGui.QPushButton(Form)58 self.pushButton_4.setObjectName(_fromUtf8("pushButton_4"))59 self.horizontalLayout_2.addWidget(self.pushButton_4)60 self.verticalLayout.addLayout(self.horizontalLayout_2)6162 self.retranslateUi(Form)63 QtCore.QMetaObject.connectSlotsByName(Form)6465def retranslateUi(self, Form):66 Form.setWindowTitle(_translate("Form", "Form", None))67 self.groupBox.setTitle(_translate("Form", "分组", None))68 bel.setText(_translate("Form", "左侧", None))69 self.pushButton_2.setText(_translate("Form", "右侧", None))70 self.pushButton_3.setText(_translate("Form", "确定", None))71 self.pushButton_4.setText(_translate("Form", "取消", None)) 727374if__name__ == "__main__":75import sys76 app = QtGui.QApplication(sys.argv)77 Form = QtGui.QWidget()78 ui = Ui_Form()79 ui.setupUi(Form)80 Form.show()81 sys.exit(app.exec_())效果：。