Delphi在页面控制中按标签号显示框架

概述我有一个独特的问题.我在 Windows XP上使用Delphi 2007.我有一个带有TPageControl组件的表单.我创建了一个我想在该PageControl中显示的Frame.我将创建许多其他框架,这些框架将根据按钮点击事件显示.无论如何都要使用框架的标签属性,这样当按下按钮时,标签编号可以传递到通用功能或程序中,以便可以为所有按钮重复使用这些功能或程序.另一个想法是使用tabheets 我有一个独特的问题.我在 Windows XP上使用Delphi 2007.我有一个带有TPageControl组件的表单.我创建了一个我想在该PageControl中显示的Frame.我将创建许多其他框架,这些框架将根据按钮点击事件显示.无论如何都要使用框架的标签属性,这样当按下按钮时,标签编号可以传递到通用功能或程序中,以便可以为所有按钮重复使用这些功能或程序.另一个想法是使用tabheets index属性并将其与帧标记号匹配.任何建议都会很棒.提前致谢.解决方法 您需要一个将标签号映射到帧类的函数,如下所示：

type  TFrameClass = class of TFrame;function GetFrameClass(const aClassID: Integer): TFrameClass;begin  case aClassID of    1 : Result := TFrameFoo;    2 : Result := TFramebar;    else Result := nil;  end;end;

然后你可以创建框架：

var FrClass: TFrameClass;    Frame: TFrame;begin  FrClass := GetFrameClass(btn.Tag);  if(FrClass <> nil)then begin     Frame := FrClass.Create(tabsheet);     Frame.Parent := tabsheet;  end;

总结

以上是内存溢出为你收集整理的Delphi在页面控制中按标签号显示框架全部内容，希望文章能够帮你解决Delphi在页面控制中按标签号显示框架所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。