社区
Delphi
帖子详情
高手请进,如何实现这个功能?**************
jiayf020978
2003-10-15 11:05:25
例如,对于打开窗口的命令show,如果是“show”字符是要执行的命令,把“show”付给一个变量,通过什么方法实现对变量的操作,实现show命令。
谢谢!
...全文
65
5
打赏
收藏
高手请进,如何实现这个功能?**************
例如,对于打开窗口的命令show,如果是“show”字符是要执行的命令,把“show”付给一个变量,通过什么方法实现对变量的操作,实现show命令。 谢谢!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
5 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
jiayf020978
2003-10-20
打赏
举报
回复
铁心刘 你好,你的方法我试过了,但是总是提示错误!我写的代码如下:
type
TmyForm = class of TF_test;
TF_test = class(TForm); //要调用的窗口
Tmsmq_accept = class(TForm) //当前窗口
在当前窗口的Button事件中的代码如下:
var
ss:TForm;
begin
ss := Tmyform(getclass(‘TF_test’)).create(nil); //执行到这里出错
ss.show;
end;
在打开窗口的createform事件中代码如下:
RegisterClasses([TF_test]); //这一句是做什么用的?
如果我要在Button中根据参数,即窗口的名字来动态的实现打开不同的窗口,那getclass()怎么使用,getclass的参数是一个常量,不是一个变量。
谢谢!
tiexinliu
2003-10-15
打赏
举报
回复
http://expert.csdn.net/Expert/topic/2348/2348755.xml?temp=.6515924
把所有的窗体都写成了这形势:
TmyForm = class of TformN;
TFormN = class(TForm)
然后在腰调用的窗体里面的Create加上
RegisterClasses([TFormN]);
然后
var a:Tform;
begin
a := Tmyform(GetClass('TFormN')).Create(nil);
a.Show;
end;
jiayf020978
2003-10-15
打赏
举报
回复
那如果传递的参数是一个string类型的窗口名称,只能是string类型,例如“W_main”,如果要动态创建窗口的话,如何实现?
谢谢!
tiexinliu
2003-10-15
打赏
举报
回复
除了case,if一个个判断,没有好的办法了,你是想写delphi编译器?
sailer_shi
2003-10-15
打赏
举报
回复
用Case去判断呀
SpringCloud零基础_小白 入门及笔记总结
文章目录SpringCloud阶段的学习**微服务架构4个核心问题****核心问题解决方案****常见的面试问题?带着这些去学习**微服务的概述**什么是微服务?**微服务优缺点**微服务通信机制**微服务的技术栈有哪些?为什么选择...
知己知彼 防范***:***对其侵占的计算机的利用
如果自己是铁桶一个,水泼不进,***无法在你的网络中的计算机取得任何访问的权限,当然就杜绝了绝大多数的泄密可能(请注意,这时候还是有可能会泄密的!比如被***欺骗而将数据发送出去)。我们先来看一下如何加强...
奥运安全之Windows系统用户摆脱******
上网的时候,经常会发现自己的网络防火墙在不停的发出警报,专家告诉你这就有可能是遭遇了***的***。奥运即将到来,为了保证您能不受干扰的享受网络奥运信息,这里为您介绍一些摆脱这些不请自来***的办法。 一、...
分层纵深防御,一切******都是浮云
后者是linux lsm tomyo的完整版(带网络保护)专门
实现
主体关键任务进程保护机制,可以有效控制溢出后的root程序权限,
实现
selinux简单保护服务软件进程的
功能
。 4,打上补丁后,负责先前的精简config到源码目录...
游戏中的回放系统是如何
实现
的?
这是【游戏开发那些事】第54篇原创回放系统,是电子游戏中常见的一项
功能
。通过回放,我们可以观摩
高手
之间的对决,重复享受游戏中的精彩瞬间,甚至还可以拿到敌方玩家的比赛录像进行分析和学习。总的来说,回放
功能
...
Delphi
5,391
社区成员
262,736
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章