13,822
社区成员
发帖
与我相关
我的任务
分享
type
TFrameClass = Class of TFrame;
var
FrameClass:TFrameClass;
FFrame:TFrame;
begin
if FFrame <> nil then FFrame:=nil;
FrameClass := TFrameClass(FindClass('TMyFrame'));
FFrame := FrameClass.Create(self);
end;