你要将Button创建在服务端还是客户端,这要做要实现什么东西?—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
             毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”或者去掉';
I.Desire := '加不加分随你';
—————————————————————————————————
    

解决方案 »

  1.   

    你的参数设为一个TNotifyEvent类型的过程指针即可呀。
    用户传入自己写好的过程的指针
    这样在程序只只要调用个指针,就可以运行用户写过程
      

  2.   

    没可能简单的将TButton从服务端传到客户端的,因为COM不兼容这种数据类型。—————————————————————————————————
    MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
                 毁誉由人,望天上云卷云舒,聚散任风。';
    if Not Assigned(I) then
      I := TI.Create(Nil);
    I.Maxim := MaximStr;
    I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”或者去掉';
    I.Desire := '加不加分随你';
    —————————————————————————————————
        
      

  3.   

    你指的是button在客户端创建
    而事件是服务器设定的吗?
      

  4.   

    TNotifyEvent类型的过程指针即可呀!!!关键是在 com 的类型库中有TNotifyEvent的过程指针的类型吗?
    你可以告诉我吗???
    如果我把地址传入!怎样把他转化 TNotifyEvent 呢?
    button.onclick:=TNotifyEvent(传入参数);这样编译通不过!
      

  5.   

    你说的情况好象是在Client上没有编译好的过程代码,而是动态创建?那样你岂不是还需要编译器?如果是预先编译好的又何必非要从Client传过来?要实现这样的目的恐怕只有使用解释语言了,因为你写的过程代码如果不是机器码,电脑是无法执行的,而动态创建的过程大概不会直接用机器码写吧,解释语言就可以由Server上的解释器翻译成机器码执行,个人意见啊。