【文件属性】:
文件名称:动态创建控件的示例delphi
文件大小:775KB
文件格式:RAR
更新时间:2012-05-11 08:41:01
动态创建控件的示例delphi
动态创建控件的原程序,共给大家学习.
case commandstr of
0:begin
i1:=i;
btn[i1]:=TButton.Create(Self);
btn[i1].Parent:=form2;
btn[i1].Visible:=false;
btn[i1].Name:='btn'+inttostr(i1);
btn[i1].Left:=Lefta;
btn[i1].Width:=widtha;
btn[i1].top:=topa;
btn[i1].Height:=heighta;
BTN[I1].Caption:=COMCAP;
btn[i1].Show;
end;
【文件预览】:
新建文件夹
----Unit8.dfm(5KB)
----Unit2.~ddp(51B)
----Project1.~dpr(345B)
----Unit3.~ddp(51B)
----Unit2.ddp(51B)
----Project1.exe(1.03MB)
----Project1.res(876B)
----Unit4.dcu(17KB)
----Unit3.~pas(5KB)
----Unit1.~dfm(274KB)
----Unit8.ddp(51B)
----normal.mdb(564KB)
----Unit3.~dfm(3KB)
----Unit1.dfm(274KB)
----Unit4.ddp(51B)
----Unit3.ddp(51B)
----Unit2.~pas(4KB)
----Unit3.dfm(3KB)
----Unit1.ddp(51B)
----Project1.cfg(434B)
----Unit4.~ddp(51B)
----Unit4.dfm(7KB)
----Unit4.pas(9KB)
----Unit1.pas(2KB)
----Unit4.~pas(9KB)
----Unit3.dcu(11KB)
----Unit2.~dfm(1KB)
----Unit2.dfm(1KB)
----Unit2.dcu(8KB)
----Unit4.~dfm(7KB)
----Unit2.pas(4KB)
----Unit1.~ddp(51B)
----Project1.dpr(289B)
----Unit8.pas(619B)
----Project1.dof(2KB)
----Unit1.~pas(2KB)
----Unit3.pas(5KB)
----Unit1.dcu(6KB)
网友评论
- 能正常编译,但是无法运行。看在辛苦写码的份上。给三颗星