IMT0601 2016-02-19 15:01 采纳率: 0%
浏览 2336

delphi自定义个组件constructor Create

求大神指点,我自定义个组件,在constructor Create(AOwner:TComponent);override; 方法里动态添加了另外一个组件(比如是TButton),问题就是,每次重新打开源程序(窗体上添加有我新做的这个组件),在新做的组件上都会动态添加一个TButton,打开一遍,多添加一个;而且在运行的时候,也会多添加一个;搞不明白了,我的目的是在新做项目上,拖动这个组件到窗体上,就是两个组件合在一起就可以了

  • 写回答

1条回答 默认 最新

  • threenewbee 2016-02-20 00:18
    关注

    加上一个判断
    if (AOwner.ControlCount < 1) then
    begin
    添加
    end;

    评论

报告相同问题?

悬赏问题

  • ¥15 MATLAB动图的问题
  • ¥15 求差集那个函数有问题,有无佬可以解决
  • ¥15 【提问】基于Invest的水源涵养
  • ¥20 微信网友居然可以通过vx号找到我绑的手机号
  • ¥15 寻一个支付宝扫码远程授权登录的软件助手app
  • ¥15 解riccati方程组
  • ¥15 display:none;样式在嵌套结构中的已设置了display样式的元素上不起作用?
  • ¥15 使用rabbitMQ 消息队列作为url源进行多线程爬取时,总有几个url没有处理的问题。
  • ¥15 Ubuntu在安装序列比对软件STAR时出现报错如何解决
  • ¥50 树莓派安卓APK系统签名