____________如何动态创建控件

Biner · 发表于 2013-10-5 19:47:18

马上注册，结交更多好友，享用更多功能^_^

您需要登录才可以下载或查看，没有账号？立即注册

x

本帖最后由 Biner 于 2013-10-5 23:54 编辑

如1,何动态创建控件，2,设置控件属性，3,建立控件相关响应事件，4,执行相关响应事件。？？？？？？

//用代码创建一个按钮
procedure TForm1.FormShow(Sender: TObject);
var
  mybutton : TButton ;
begin
   mybutton := TButton.Create(Self);
with mybutton do
begin
      Parent := form1 ;
      Align := altop ;
      Caption := '这是一个代码创建的控件' ;
end ;
end;

用代码创建控件，设置控件属性都好了，

3,建立控件相关响应事件，4,执行相关响应事件，怎么做呢？

xuaner0719 · 发表于 2013-10-24 23:59:37

支持一下不错的

Biner · 发表于 2013-10-25 13:54:29

呵呵现在已经会了，谢谢关心哦

动感超人xx · 发表于 2014-5-14 16:57:25

顶·~~~~~~~~~~~~

王献8 · 发表于 2014-5-15 17:54:47

{:1_1:}这个问题支持下啊

希望 · 发表于 2014-5-15 18:14:33

(mybutton as Tbutton).click:lol:

fayisan · 发表于 2014-5-25 16:53:17

积分测试中。。。。

765643729 · 发表于 2014-5-26 12:09:43

太难了,路过

puppylove · 发表于 2014-5-30 17:14:36

真是高大上，厉害厉害

长沙hacker · 发表于 2014-6-11 17:08:40

太没挑战性！

重眉々碎步 · 发表于 2014-6-20 11:43:24

人品木有，鱼币拿走

七月你好 · 发表于 2014-6-24 10:59:03

强烈支持楼主ing……

黄种人 · 发表于 2014-6-26 16:48:41

希望学习一段时间后能知道答案

huha88 · 发表于 2014-6-30 15:30:05

何动态创建控件

H9enRy · 发表于 2014-8-1 01:22:15

感谢分享~！

墙角君 · 发表于 2014-8-6 00:59:19

来拿鱼b的。。。

墙角君 · 发表于 2014-8-6 22:16:50

看看。。。。

墙角君 · 发表于 2014-8-7 03:08:00

看看

aix0321 · 发表于 2014-8-10 09:02:33

楼主，新人试运气来了，共同进步撒~

yangzy · 发表于 2014-8-11 14:53:29

路过~~

账号		自动登录	找回密码
密码			立即注册

____________如何动态创建控件

马上注册，结交更多好友，享用更多功能^_^

评分

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币


23 鱼币	回复本帖可获得 1 鱼币奖励! 每人限 1 次(中奖概率 50%)