-
等级
本版专家分：3418结帖率 94.74% -
谁能够告诉我在Delphi中如何实现"宏代换",例如函数名称为一个字符串变量myfunc="function1"，如何通过myfunc这个变量来调用function1这个函数？多谢！只要能够解答者，都给分！展开阅读全文
-
等级
本版专家分：5862 -
可以用函数类型来实现
type
TMyFunc = function（） // 后面要跟参数，和你的function1一致
...
var
MyFunc: TMyFunc;
MyFunc := function1;
以后就可以用myfunc来调用function1了
-
等级
本版专家分：347 -
哈哈,楼上先说了函数指针也.
-
等级
本版专家分：202 -
function AAAA(string)
if string='myfunc' then
call Function1()
end if
if string='myfunb' then
call function2()
end if
end function
-
等级
本版专家分：3418
-
sorry,我的意思是函数的名称是动态的。希望各位大虾能清楚！
-
等级
本版专家分：3292勋章
-
- 签到达人 累计签到获取，不积跬步，无以至千里，继续坚持！
-
-
是啊，函数指针也不是静态的阿，先说清楚你要做什么吧
-
等级
本版专家分：84 -
在DELPHI没有宏代换这个功能.换一下你的思路,你可以定义一个函数,用一个参数来表示你所要进行的功能.例如:FUNCTION AA(I:STRING)
当I为1时进行增加操作;
当I为2时进行删除操作;
等等.
-
等级
本版专家分：11472 -
以下两种情况可以：
1.是输出的函数：
按照Windows的方法就行了。
// 定义函数的地方
procedure MyProc( p: Integer ); export; stdcall;
begin
// do what you want to do
end;
exports
MyProc;
// 调用的地方
type
TMyProc = procedure(p: Integer);
procedure InvokeMyProc(
const sProcName: String; // 过程名
param: Integer // 参数
);
var
aProc: TMyProc;
begin
aProc := GetProcAddress( hInstance, PChar(sProcName) );
TMyProc(aProc)( param );
end;
// 使用范例
InvodeMyProc( 'MyProc', 1 );
2.是类对象中的published方法：
type
TMyMethod = procedure(p: Integer) of object;
procedure InvokeMyMethod(
Obj: TObject; // 对象
const MethodName: String; // 方法名
param: Integer // 参数
);
var
aMethod: TMethod;
begin
aMethod.Code := Obj.MethodAddress( MethodName );
aMethod.Data := Obj;
TMyMethod(aMethod)( param );
end;
//////////////////////////
其实，还有一种方法：
if ProcName='MyProc' then
MyProc( 100 );
当然，你不会愿意这么用的，我这样说你还会骂我呢。
- 世界名著100部简介
01、傲慢与偏见 02、孤星血泪 03、雾都孤儿 04、唐·吉诃德 05、安娜·卡列尼娜 06、飘 07、简·爱 08、悲惨世界 09、茶花女 10、基督山恩仇记 11、童 年 12、这里的黎明静悄悄 13、钢铁是怎样炼成的 ...
- 听音扒谱app_抓个逃犯给100亿？这辈子不打工一起做赏金猎人！揭秘“人民赏金”APP的套路...
少年时，我很喜欢许巍的一句歌词：曾梦想仗剑走天涯，看一看世界的繁华。那是一个游侠梦。长大以后，梦想实现了80%，化身键盘侠，天天在评论区“仗贱走天涯”，几十年靠一个“穷”字行走江湖。就在昨天，怀疑是我的...
- 世界名着100部简介
01、傲慢与偏见 02、孤星血泪 03、雾都孤儿 04、唐·吉诃德 05、安娜·卡列尼娜 06、飘 ... 10、基督山恩仇记 11、童 年 12、这里的黎明静悄悄 13、钢铁是怎样炼成的
- 《汉魏风云》2、孙吴兵法第一传人——辛苦的天才曹操
【档案】 姓名：曹操，字孟德 别名：...只知道比较矮，拿破仑式的人物 相貌：姿貌短小，而神明英发（《魏氏春秋》） 座驾：白鹄，大宛紫血马，绝影《魏书》，爪黄飞电《三国演义》 武器：百辟刀《艺文类聚》，...
- 我在CSDN参与的3000个帖子
2：100分急求，随机输出十个小写字母，但是，要求这十个字母不相同 3：求Sn=a+aa+aaa+…+aaa…a（n个a）之值 4：数组题 望高手帮忙！ 5：呵呵，来推荐一下我的网站，本站提供大量当今流行的免费的音乐和免费电影，...
- 《伤心秦汉》2、从胯下崛起的将军——大汉淮阴侯韩信
【档案】 姓名：韩信 外号：兵仙 性别：男 籍贯：淮阴(今江苏省淮阴西南) 学历：无文凭，自学成才 秦始皇焚书坑儒是在公元前213年，所以，楚汉群雄其实少时都曾读过书，韩信肯定也是读过的，而且学的应该是...
- 转
转 自:...浏览之间突然发现一个名字钱江，当时就有种疑惑，不会是百合网吧？*I9| Z.LZ-jGuest仔细一看，还真是百合网！板凳网 ——全新超市般的C2B原创作品交易平台...
- nginx实现均衡负载、nginx第三方模块的添加
nginx nginx的安装 下载nginx安装包并解压 tar zxf nginx-1.14.0.tar.gz 对nginx源码文件进行修改，隐藏版本号 cd /root/nginx-1.14.0/src/core/ vim nginx.h 14 #define NGINX_VER ...cd /root/nginx-1....
- 人生哲理枕边书——你应该知道的165个人生哲理
人生哲理枕边书——你应该知道的165个人生哲理
- python中的异常、模块、文件
异常 在程序开发中，如果对某些代码的执行不确定(程序的语法完全正确) ... num = int(raw_input('请输入一个整数： ')) except: print '请输入正确的整数' # 无论是否输入错误额，程序都会正常得执行 print '...
- 《汉魏风云》1、速度与激情——无双吕布的悲喜人生
【档案】 姓名：吕布，字奉先（奉先，敬奉祖先，犹言孝子之意。） 生卒：不详（应早于刘备生年公元161年）—公元198年 性别：男 别称：飞将 籍贯：五原郡九原县（内蒙古包头）人 家庭出身：闾巷游侠（《后汉书...
- 区块链技术
https://www.zhihu.com/question/37290469 作者：汪乐-LaiW3n 链接：https://www.zhihu.com/question/37290469/answer/107612456 ...商业转载请联系作者获得授权，非商业转载请注明出处。...--
- python下的数据库、多线程、socket
mysql 数据库的增删改查 查： import MySQLdb # 打开门 conn = MySQLdb.Connect(host...cur = conn.cursor() # 创建了一个"手" # 拿东西 # 这个操作影响了多少行数(有多少行被操作了) execut...
- 汉语中的 熟语中的成语900个
A 1、哀莫大于心死——心死：指心像死灰的灰烬。指最可悲哀的事，莫过于思想顽钝，麻木不仁。 2、爱博而情不专——对人或事物的喜爱很广泛，而感情不能专一。 3、爱则加诸膝，恶则坠诸渊——加...
- 【搬运】各种知乎段子
偷偷从口袋里摸出几张纸币丢在我脚旁边，又转了一圈然后回来，拍拍我肩膀，指着下面说，“哥们，你钱掉了！” 我愣了下，拿起手机塞进口袋，低头把钱捡起来，“谢谢啊！”（请参考范伟的声音。） 然后戴...
- 《上古卷轴5重制版》支线任务
《上古卷轴5重制版》支线任务 《上古卷轴5重制版》支线任务 ... 前往风舵城，在西部的市场区进到炼金商店"雪瓶"。... 在店里看到努瑞莱昂和助手奎因图斯发生争执，助手劝他不要再...它埋藏在西边的一...
- LVS的NAT、TUNNEL、Full-NAT模式
server1：172.25.65.1 VIP:172.25.65.100 realserver: server2：172.25.65.2 开启阿帕奇服务 在/var/www/html/index.html 中写入 server2 server3：172.25.65.3 开启阿帕奇服务 在/var/www/html/index.html 中...
- 量子物理史话
大学时，闲的没事在图书馆读...怀念学校啊，学校的图书馆，好久没有读书，学习了，运动也只是坚持一段时间~ 2011/11/26 ----------------------------------- 第一章 黄金时代 第二章 乌云 第三章
- 科学发明家特斯拉传记
转自：http://www.cnblogs.com/bluespot/archive/2010/03/06/1679718.html //为了方便阅读，所以我根据矿业大学的PDF版本，使用软件转换，并手工校正。 ...//邵子扬 2009年9月-11月 ...科学发明家特斯拉
- 展现自己的人生智慧
汉代的刘向为了说明“知己者不怨人”的道理，举了个寓言故事：枭（一种猛禽）遇到鸠（一种水鸟）。鸠问它：“你要去哪里？”枭说：“我要搬到东方去住。”鸠问它为什么，枭说:“这里的人都讨厌我的叫声，所以我要搬...
- 令人震撼的科幻小说——黎曼的猫
编按：本文原发表于《科幻大王》。作者北星真名赵如汉，著名科幻文学作者、翻译者、爱好者，美国纽约州立大学数学教授。本文约25000字。一 一个意想不到的电话 电话铃响起的时...
- 袁炳发小小说40篇目录
【7】婚姻一种【8】读书【9】岁月【10】软刀【11】尾随【12】恍惚 【13】镶牙左【14】成长【15】男人 【16】红绸 【17】死之一种...【18】白狐【19】我的名字叫袁炳发... 【20】木像【21】骨髓...
- 在我心目中的霸气海贼王——路飞 不一样的路飞
路飞看起来说话做事脑子不转弯。但他是个大智若愚的人。很清楚自己应该干什么。有着天生做王者的魄力与霸气。虽然路飞有时说话不经过大大脑，让人想生气都提不起劲。但没几个人敢真正说路飞不聪明。...
- 萧何月下追韩信时候，韩信对项羽的这个评价是否属实
萧何月下追韩信时候，韩信对项羽的这个评价是否属实 悬赏分：15 - 解决时间：2008-3-21 18:38萧何月下追韩信时候，韩信说：“我个人也认为您不如他，不过我曾经是项羽的手下，我来给您讲讲他的为人。项羽这个人英雄...
- 上帝掷骰子吗--量子物理史话
上帝掷骰子吗--量子物理史话 第一章黄金时代 一 我们的故事要从1887年的德国开始。位于莱茵河边的卡尔斯鲁厄是一座风景秀丽的城市，在它的城中心，矗立着著名的18世纪的宫殿。郁郁葱葱的森林和温暖的气候也使得这...
- 华为机考题库(全）
包括招聘的机考题，及面试过程中会问到的数据结构的相关内容，排序算法全部包括并且有改进算法，一点点改进可以让你表现的与众不同，如果好的话给点评价吧亲
- Java基础核心技术：面向对象编程(day05-day07)
本套Java视频完全针对初级学员，课堂实录，自发布以来，好评如潮！Java视频中注重与学生互动，讲授幽默诙谐、细致入微，覆盖Java基础所有核心知识点，同类Java视频中也是代码量大、案例多、实战性强的。同时，本Java视频教程注重技术原理剖析，深入JDK源码，辅以代码实战贯穿始终，用实践驱动理论，并辅以必要的代码练习。 通过20的课程学习，使学员掌握java核心语法、面向对象思想编程、异常处理、IO流、集合类、多线程、网络编程等。
- 微信小程序源码-合集1.rar
【微信小程序-源码合集】该合集主要整理 包含交友互动、节日祝福、金融行业、旅游行业、论坛系列、美容行业！
- 敏捷开发V1.0.pptx
敏捷开发PPT 敏捷开发以用户的需求进化为核心，采用迭代、循序渐进的方法进行软件开发。在敏捷开发中，软件项目在构建初期被切分成多个子项目，各个子项目的成果都经过测试，具备可视、可集成和可运行使用的特征。换言之，就是把一个大项目分为多个相互联系，但也可独立运行的小项目，并分别完成，在此过程中软件一直处于可使用状态。
- Notepad++ 7.9.1
notepad++是一个免费的、开放源码的文本和源代码编辑器。notepad++是用c++编程语言编写的，它以减少不必要的功能和简化过程而自豪，从而创建了一个轻便高效的文本记事本程序。实际上，这意味着高速和易访问的、用户友好的界面。 notepad++已经存在了将近20年，没有任何迹象表明它的受欢迎程度会下降。记事本绝对证明了你不需要投资在昂贵的软件来编写代码从舒适的自己的家。自己尝试一下，你就会明白为什么Notepad能坚持这么久。