____________如何动态创建控件

Angel丶L · 发表于 2014-8-12 10:06:49

支持了

lanyunqing · 发表于 2014-8-13 14:11:26

听说这里有鱼币，是真的吗

且行且珍惜 · 发表于 2014-9-8 17:58:21

楼主加油，鱼C加油！我们都看好你哦！

選擇ゞ忘記 · 发表于 2014-9-8 22:23:50

两包烟的钱，把不了妹买不了田，不如拿来支持小甲鱼推出更多原创教学视频！

喷香水的蚊子 · 发表于 2014-9-12 16:40:43

我会努力的。。。。。。。。。。。。。。。。。。。。。。。

qianketian · 发表于 2014-9-13 10:02:27

支持一下

rmb788520 · 发表于 2014-9-16 19:32:15

回复真有鱼币嘛？

ixuanyan · 发表于 2014-9-24 18:47:24

procedure TForm1.Button1Click(Sender: TObject);
begin
showmessage('Test');
end;

procedure TForm1.FormCreate(Sender: TObject);
var Myb:tbutton;
begin
  Myb:= tbutton.Create(self);
  with myb do
begin
   parent := form1;
   align := altop;
   caption:= 'AAAAAAA';
   onclick := button1click; //重要是这一行。可以把事件弄到别的按钮事件中。
end;

end;

许-sai · 发表于 2014-9-29 09:43:20

看上去高大上的样子。

凡人也好 · 发表于 2014-10-6 20:08:31

支持楼主，小白飘过

ilboyvm · 发表于 2014-10-13 16:13:56

过来学习学习！，，，，，，，

tlwangxd · 发表于 2014-10-15 06:39:58

这个我也不会，正在学习，关注一下

qq351317878 · 发表于 2014-10-16 09:03:12

支持下

蚂蚁_Data · 发表于 2014-10-16 10:20:22

听说回帖有奖励

gunlin321 · 发表于 2014-11-25 01:20:06

我能像你这样用过呢就好了

wwacai · 发表于 2014-12-2 20:26:28

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

Cevil · 发表于 2015-1-9 01:05:28

不知道

635178917 · 发表于 2015-2-5 15:02:40

对啊，看帖回帖，不知不觉就升级了

一个人的路 · 发表于 2015-2-9 15:45:05

不错不错，学习了。{:1_1:}

悠悠清风 · 发表于 2015-2-9 23:05:09

帮顶一下，~~~~

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

____________如何动态创建控件

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币

回帖奖励 +1 鱼币


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