首页 > TAG信息列表 > newTab
56__index元方法
__index(两个下划线) 定义普通表 给普通表p,设置元表y,而元表y中有index,__index有一个表i,i中有我们访问的不存在的key. print("---测试__index----") -- 普通表 tab1 = {"a","b","c"} print(tab1[5]) -- 普通表,有一个元表,5= "e" newTab = {} newTab[5] ="e" meDelphi 动态创建TpageControl标签 基于Frame
form1: frame3: 效果图:可以基于frame3创建多个相同的tab,且包含所有frame3设定的业务逻辑 代码也很简单: uses Unit3;procedure TForm2.Button2Click(Sender: TObject); var NewTab: TTabSheet ; frame: TFrame3; begin NewTab := TTabSheet.Crea