-
等级
本版专家分：3418结帖率 94.74% -
谁能够告诉我在Delphi中如何实现"宏代换",例如函数名称为一个字符串变量myfunc="function1"，如何通过myfunc这个变量来调用function1这个函数？多谢！只要能够解答者，都给分！展开阅读全文
-
等级
本版专家分：408 -
切......,你以为是VB啊?
-
等级
本版专家分：4783
-
type TMyfunc = function (参数定义) :返回值 ;
var
MyFunc :TMyfunc ;
function fun1...
begin
...
end ;
...
begin
myfunc := @fun1 ; //赋值
myfunc() ;//调用
end ;
-
等级
本版专家分：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 );
当然，你不会愿意这么用的，我这样说你还会骂我呢。
-
等级
本版专家分：353 -
gz
- 我在CSDN参与的3000个帖子
今日偶然翻到，感慨万千 1：申述：版主，是否扣了我的专家分？ 2：100分急求，随机输出十个小写字母，但是，要求这十个字母不相同 3：求Sn=a+aa+aaa+…+aaa…a（n个a）之值 4：数组题 望高手帮忙！ 5：呵呵，来推荐...
- 听音扒谱app_抓个逃犯给100亿？这辈子不打工一起做赏金猎人！揭秘“人民赏金”APP的套路...
少年时，我很喜欢许巍的一句歌词：曾梦想仗剑走天涯，看一看世界的繁华。那是一个游侠梦。长大以后，梦想实现了80%，化身键盘侠，天天在评论区“仗贱走天涯”，几十年靠一个“穷”字行走江湖。就在昨天，怀疑是我的...
- 《伤心秦汉》2、从胯下崛起的将军——大汉淮阴侯韩信
【档案】 姓名：韩信 外号：兵仙 性别：男 籍贯：淮阴(今江苏省淮阴西南) 学历：无文凭，自学成才 秦始皇焚书坑儒是在公元前213年，所以，楚汉群雄其实少时都曾读过书，韩信肯定也是读过的，而且学的应该是...
- 转
转 自:...浏览之间突然发现一个名字钱江，当时就有种疑惑，不会是百合网吧？*I9| Z.LZ-jGuest仔细一看，还真是百合网！板凳网 ——全新超市般的C2B原创作品交易平台...
- 《汉魏风云》2、孙吴兵法第一传人——辛苦的天才曹操
【档案】 姓名：曹操，字孟德 别名：...只知道比较矮，拿破仑式的人物 相貌：姿貌短小，而神明英发（《魏氏春秋》） 座驾：白鹄，大宛紫血马，绝影《魏书》，爪黄飞电《三国演义》 武器：百辟刀《艺文类聚》，...
- 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....
- python中的异常、模块、文件
异常 在程序开发中，如果对某些代码的执行不确定(程序的语法完全正确) 可以增加try来捕获异常 try: 尝试执行的代码 except: 出现错误的处理 例如： try: num = int(raw_input('请输入一个整数...print '...
- 【搬运】各种知乎段子
也不一定是段子什么的 反正各种乱搞的辣，加上前面几篇也差不多了 上大学的时候，有次去网吧上网，去的有点早，网吧没几个人，我随手把手机放桌上就开始打游戏。 过了一会儿，进来一小伙子，网吧转了几圈走到我这...
- 《汉魏风云》1、速度与激情——无双吕布的悲喜人生
【档案】 姓名：吕布，字奉先（奉先，敬奉祖先，犹言孝子之意。） 生卒：不详（应早于刘备生年公元161年）—公元198年 性别：男 别称：飞将 籍贯：五原郡九原县（内蒙古包头）人 家庭出身：闾巷游侠（《后汉书...
- LVS的NAT、TUNNEL、Full-NAT模式
实验环境： lvs调度器: 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/...
- 《上古卷轴5重制版》支线任务
《上古卷轴5重制版》支线任务 《上古卷轴5重制版》支线任务 ... 前往风舵城，在西部的市场区进到炼金商店"雪瓶"。... 在店里看到努瑞莱昂和助手奎因图斯发生争执，助手劝他不要再进行危险的旅行了，老...
- 汉语中的 熟语中的成语900个
A 1、哀莫大于心死——心死：指心像死灰的灰烬。指最可悲哀的事，莫过于思想顽钝，麻木不仁。 2、爱博而情不专——对人或事物的喜爱很广泛，而感情不能专一。 3、爱则加诸膝，恶则坠诸渊——加...
- python下的数据库、多线程、socket
mysql 数据库的增删改查 查： import MySQLdb # 打开门 conn = MySQLdb.Connect(host='127.0.0.1', user='root', passwd='redhat',db='python') ...cur = conn.cursor() # 创建了一个&...# 这个操作影响了多少...
- 萧何月下追韩信时候，韩信对项羽的这个评价是否属实
萧何月下追韩信时候，韩信对项羽的这个评价是否属实 悬赏分：15 - 解决时间：2008-3-21 18:38萧何月下追韩信时候，韩信说：“我个人也认为您不如他，不过我曾经是项羽的手下，我来给您讲讲他的为人。项羽这个人英雄...
- 人生哲理枕边书——你应该知道的165个人生哲理
人生哲理枕边书——你应该知道的165个人生哲理 柯钧 编著 生活是自己创造的。每个人都会时常面临来自生活、工作和社会的各种各样的问题。我们的处世方法、工作态度、努力程度、思维方式和心态信念等等决定了我们...
- 区块链技术
https://www.zhihu.com/question/37290469 作者：汪乐-LaiW3n 链接：https://www.zhihu.com/question/37290469/answer/107612456 ...商业转载请联系作者获得授权，非商业转载请注明出处。...--
- 科学发明家特斯拉传记
转自：http://www.cnblogs.com/bluespot/archive/2010/03/06/1679718.html //为了方便阅读，所以我根据矿业大学的PDF版本，使用软件转换，并手工校正。 ...//邵子扬 2009年9月-11月 ...科学发明家特斯拉
- 展现自己的人生智慧
枭将东徙 汉代的刘向为了说明“知己者不怨人”的道理，举了个寓言故事：枭（一种猛禽）遇到鸠（一种水鸟）。鸠问它：“你要去哪里？”枭说：“我要搬到东方去住。”鸠问它为什么，枭说:“这里的人都讨厌我的叫声，...
- 在我心目中的霸气海贼王——路飞 不一样的路飞
路飞看起来说话做事脑子不转弯。但他是个大智若愚的人。很清楚自己应该干什么。有着天生做王者的魄力与霸气。虽然路飞有时说话不经过大大脑，让人想生气都提不起劲。但没几个人敢真正说路飞不聪明。...
- 中国俗语大全
1、哀莫大于心死——心死:指心像死灰的灰烬。指最可悲哀的事,莫过于思想顽钝,麻木不仁。 2、爱博而情不专——对人或事物的喜爱很广泛,而感情不能专一。 3、爱则加诸膝,恶则坠诸渊——加诸膝:放在膝盖上;...
- 上帝掷骰子吗--量子物理史话
上帝掷骰子吗--量子物理史话 第一章黄金时代 一 我们的故事要从1887年的德国开始。位于莱茵河边的卡尔斯鲁厄是一座风景秀丽的城市，在它的城中心，矗立着著名的18世纪的宫殿。郁郁葱葱的森林和温暖的气候也使得这...
- 量子物理史话
大学时，闲的没事在图书馆读过的书，开始还能看明白，到后来越来越看不明白了...... 此外还有时"间简史之简史",“老人的玩具” ...怀念学校啊，学校的图书馆，好久没有读书，学习了，运动...第二章 乌云 第三章
- 海贼王
【开头增加个剧场版目录】 剧场版—— Movie01-2000-邬南的黄金 Movie02-2001-发条岛的冒险 Movie03-2002-珍兽岛之乔巴的王国 Movie04-2003-死亡尽头的冒险 ...Movie08-2007-沙漠王女与
- 令人震撼的科幻小说——黎曼的猫
编按：本文原发表于《科幻大王》。作者北星真名赵如汉，著名科幻文学作者、翻译者、爱好者，美国纽约州立大学数学教授。本文约25000字。一 一个意想不到的电话 电话铃响起的时...
- 袁炳发小小说40篇目录
【7】婚姻一种【8】读书【9】岁月【10】软刀【11】尾随【12】恍惚 【13】镶牙左【14】成长【15】男人 【16】红绸 【17】死之一种...【18】白狐【19】我的名字叫袁炳发... 【20】木像【21】骨髓...
- 世界首席黑客
我的主页http://www.tigerion.cn十大超级老牌黑客之一：约翰*德拉浦 1943年出生于美国乡村的德拉浦，从小就表现出了极强的反叛性格，这样的性格决定了 日后他那特立独行的骇客面目。不过尽管他的个性孤辟，但是他却...
- 侯捷C++全套课程视频资源
侯捷全套课程，C++11新标准，侯捷 - C++面向对象高级开发，侯捷 - STL和泛型编程，C++内存管理_侯捷
- 华为机考题库(全）
包括招聘的机考题，及面试过程中会问到的数据结构的相关内容，排序算法全部包括并且有改进算法，一点点改进可以让你表现的与众不同，如果好的话给点评价吧亲
- 微信小程序源码-合集1.rar
【微信小程序-源码合集】该合集主要整理 包含交友互动、节日祝福、金融行业、旅游行业、论坛系列、美容行业！
- Spring Boot实战入门篇视频课程
通过大量的实战编码进行讲解，课程以Hello world为切入点。 第一章：对spring boot的特性、优缺点、场景进行详细讲解。 第二章：springboot核心功能 第三章：热部署的几种模式 第四章：Web开发的各种技术 第五章：数据访问层：spring data jpa、jdbctemplate、mybatis、redis 第六章：异常相关的处理 课程以实战为主，理论为辅相结合，学习完成后能实际参与spring boot的项目开发为目的。