zoukankan      html  css  js  c++  java
  • 动态创建Frame窗体(根据类名,除T以外的字母)

    假设有如下Frame窗体 :  FromFrame,levelFrame
    一、如果需要根据类名动态生成它们,先在各frame窗体的pas中注册它们各自的类。
    如下:

    initialization
    RegisterClass(TFromFrame);

    initialization
    RegisterClass(TlevelFrame);
    二、在调用者的PAS中,引用它们
    如:
    uses ufromframe, ulevelframe;
    三、取得类名
    四、根据类名动态生成Frame窗体
    procedure lp_ShowFrame(FrameName:String);
    type
    TFrameClass 
    = Class of TFrame;
    var
    FrameClass:TFrameClass;
    FFrame:TFrame;
    begin
      
    if FFrame <> nil then FFrame:=nil;

      FrameClass :
    = TFrameClass(FindClass('T'+FrameName));
      FFrame :
    = FrameClass.Create(self);

      
    with FFrame do begin
          Parent :
    = tab_detail;
          Visible :
    = true;
          Top :
    = 40;
          Font.Name :
    = '宋体';
          Font.Size :
    = 9;
      
    end;
    end;
    五、调用方法:
    lp_ShowFrame(FrameName); 
  • 相关阅读:
    as3 绕中心点旋转
    TweenMax
    As3支持的Html标签一览
    AS3.0 静音和停止所有声音
    as3 如何判断同时按下两个键
    前置窗体
    系统音效控制
    LocalConnection
    as3代码实现调用摄像头
    air 加载网页
  • 原文地址:https://www.cnblogs.com/sonicit/p/1191241.html
Copyright © 2011-2022 走看看