delphi 动态创建窗口的问题??

future_ty 2007-01-11 05:00:02
各位老大,问一下如何
Application.CreateForm(Findclass('TF_showform'), TForm('F_showform'));
用代变量方法创建窗口.
试过几种方法如:
var
Fromname,classname:string;
FindForm:TForm;
FindFormClass:TFormClass;

Fromname :='F_showform';
FindForm :=Tform(Fromname);
classname:='T'+'F_showform';
FindFormClass:=TFormClass(Findclass(classname));
if FindFormClass<>nil then
begin
application.Createform(FindFormClass,FindForm);
FindForm.Show;
end;
到FindFormClass:=TFormClass(Findclass(classname)); 报错
提示没有发现Class.

请问谁有好的方法,帮小弟解决一下!!!!!谢了
...全文
493 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
yeliming 2007-01-18
  • 打赏
  • 举报
回复
呵呵
Delphi1985 2007-01-17
  • 打赏
  • 举报
回复
操5分啊?
Delphi1985 2007-01-17
  • 打赏
  • 举报
回复
用RegisterClass函数注册一下你的窗体类
simb 2007-01-16
  • 打赏
  • 举报
回复
你的TFORMCLASS是什么东西?你定义了'TF_showform'这个类吗?你到底想要做什么这样做的效率比较底啊
future_ty 2007-01-12
  • 打赏
  • 举报
回复
上面的老大,能不能说的具体一些???
GARNETT2183 2007-01-11
  • 打赏
  • 举报
回复
使用类类型就可以了..
future_ty 2007-01-11
  • 打赏
  • 举报
回复
有没有老大给回答一下.急呀!!

5,386

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧