动态创建panel后动态创建label使label的parent等于panel,为何label不可见?
解决方案 »
- 能不能根据显示器屏幕大小调节 组件的宽度?
- 又加工资了,散分
- windows mediaplayer给播放列表添加项目
- 关于SPComm编程的问题
- 用delphiX,局部半透明怎么实现呀?
- ADO的问题,望指教
- Delphi中ADO的ADODataSet中AddNew问题(在线等回答)
- procedure gettablename(tablename:string;from1:TForm1);
- 如何实现外壳扩展?
- Why?Why?Why?D6+Win2000中用Memo不能正确显示(“”)
- 请问一下ACCESS可以做成网络版的数据庫吗? 就是用ACCESS为基础的软件可以支持多用户吗?
- 超简单问题,HDC(设备描述表句柄)指的是什么?和HWnd有什么区别?
panel1 := tpanel.Create(self);
panel1.Parent := self;
label1 := tlabel.Create(panel1);
label1.Parent := panel1;
label1.Caption :='……'
lbl:= TLabel.Create(self);
lbl.Parent:= panel1;
lbl.Caption:= 'text';
lbl.Top:= 10;
lbl.Left:= 10;
lbl.AutoSize:= true;
lbl.BringToFront;这些都写上我不信还不行。
lbl.Visible := true;
不过,设置一个控件的parent最好用SetParent,而不要对Parent属性赋值, 我试过可能会失败。
设为flase 试一试..
var
pnl : TPanel;
lbl :Tlabel;
begin
pnl :=Tpanel.Create(self);
pnl.Parent := self;
lbl := TLabel.Create(pnl);
lbl.Parent := pnl;
lbl.Caption := 'fafa';
lbl.Left :=10;
lbl.Top := 10;end;
估计你没设parent请大家去 http://www.new7wonders.com/c/voting.php 投长城一票
label.BringToFront;