怎么控制delphi里的控件随窗口的大小而改变大小啊?
怎么控制delphi里的控件随窗口的大小而改变大小啊?
设置控件的anchors procedure TForm1.FormResize(Sender: TObject); begin [red]设置控件大小[/red] end; 或设置panel1.align:=alClient 很想知道! 随窗口的大小而改变大小 的规则有很多种,简单的,上面的说法就行了 复杂的规则,自己在resize事件里写代码调整都比较困难引用 procedure TForm1.FormResize(Sender: TObject); begin [red]设置控件大小[/red] end; 或设置panel1.align:=alClient 可视控件大部分都有Align属性,即对齐属性,充分利用这个属性即可不用代码调整控件位置 例: 有一个按钮,我希望它始终在窗口的下方,并且在最右边。 可以这样做: 界面中添加一个Panel控件(Panel1),设置其Align属性为alBottom,即下方对齐,这样无论如何改变窗体大小,Panel都在窗体下方,其高度不变。(为了美观,可设置Panel的BevelOuter为bvNone,设置Panel的Caption为空) 在Panel1中再添加一个Panel控件(Panel2),设置其Align属性为alRight,即右侧对齐,改变其宽度为需要的宽度,比如100。 最后在Panel2中添加一个TButton控件,就OK了。 如楼上,通过panel来控制位置 楼主的是想让控件随着窗口的分辨率自动适应显示的大小吧? FormResize+panel+align属性
相关问答:
Delphi 像亡国的南宋,试问这语言还有前途吗? Win32开发不如C#; 面像对像开发不如JAVA; 系统开发不如VC++6.0; 能用性不如VB6.0; 不支持Web开发。。。 出个Delphi 2010免费一年会有人用吗?
......
我写了个小程序,上面添加了一个shockwaveflash控件,然后在movie里写入swf文件的路径,然后执行没有问题。 当我把这个程序转移到另一台电脑执行时, shockwaveflash 控件显示空白。也就是没有加载那个swf文件。 ......
procedure RunFunction; type TFunc = function(A: Integer): Integer;stdcall; //这里根据DLL里面函数的声明修改 var ......
我先用idhttp 的get方法访问一个网站,网站返回了一段cookie,当我 调用 idhttp post方法的时候,我如何把服务器返回的这段cookies带上 ,先谢谢各位了 读取 HTTP Response Header 里面有 Set-Cookies 域 ......
procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer); var len,MaxDelete:Integer; P:PLongint; //4 个字节的长整形指针 begin P:=PLongint(A);// 取的 A 的 ......