我想让panel1固定显示在panel2的右下角,panel1的大小固定,例如16*16
panel2的Alien是alclient,当窗体大小发生改变的时候,希望panel1依然在panel2的右下角,这个怎么设置呢
panel2的Alien是alclient,当窗体大小发生改变的时候,希望panel1依然在panel2的右下角,这个怎么设置呢
解决方案 »
- 如何将多个字符串数组连接成为一个字符串?
- 帮我看下数据库语句错在哪
- TStringList的一个问题,急急
- Tp 的串口编程问题?
- 我晕了,到哪里改密码啊?
- 急,DELPHI编程如何控制小票打印(如超市的收银打印),高分!!
- 在Delphi中Remote Data Module与Transaction Data Module 执行有效率??
- 急问关于socket编程的问题
- 如何根据抽象的概念来定义具体的类?
- 哪位高手有自定义报表程序?outlook的竖工工具条控件?
- Delphi 调用VC编写的DLL问题返回直的问题
- 已知密文文件和公钥文件,如何用Libeay32.dll中的RSA_public_decrypt()函数进行解密?
begin
self.Panel1.Parent := self.Panel2;
self.Panel1.Top := self.Panel2.Height - self.Panel1.Height;
self.Panel1.Left := self.Panel2.Width - self.Panel1.Width;
end;
BevelEdges就可以了
这个属性就在属性框里
procedure TForm1.Panel2Resize(Sender: TObject);
begin
Panel1.Top:=Panel2.Height-Panel1.Height;
Panel1.Left:=Panel2.Width-Panel1.Width;
end;