原文转自:http://blog.csdn.net/zengcong2013/article/details/18355959 inputbox的返回值是,你在输入框中输入的文字.而inputquery的返回值是,你是否点击了确定按钮.它的返回值是布尔型的.如果你在inputbox中一样也不输入,就点击取消的话,就会提示出错,而inputquery就不会.它们前面的两个参数都是一样的,分别是输入框的标题,和提示信息.例:if inputbox('加法题','7+5','')='12' then …
Delphi InputBox.InputQuery函数 两个函数都是弹框提示输入信息 function InputQuery(const ACaption, APrompt: string; var Value: string): Boolean;    // 输出布尔值 function InputBox(const ACaption, APrompt, ADefault: string): string;    // 输出文本 看一下 InputBox 的函数原型(调用了InputQuer…
使用 InputBox.InputQuery 的启发 看了 InputBox.InputQuery 函数实现的源码, 有些收获与心得... -------------------------------------------------------------------------------- 通过 InputBox 可获取用户输入的字符串: --------------------------------------------------------------------------…
源:Delphi中unicode转汉字函数 近期用到这个函数,无奈没有找到 delphi 自带的,网上找了下 有类似的,没有现成的,我需要的是 支持 “\u4f00 ” 这种格式的,即前面带标准的 “\u”  于是改造了一下. 下面是 解码 函数: 方便有需要的人吧,我自己也需要^_^ /// <summary> /// // Unicode转汉字 ,支持自动过滤非 unicode编码,即非 unicode编码不转换 /// 只支持 标准的 类型 \u4e00 这种格式的 转换, 以\u 开头…
Delphi 支持三种形式的回调函数 全局函数这种方式几乎是所有的语言都支持的,类的静态函数也可以归为此类,它保存的只是一个函数的代码起始地址指针( Pointer ).在 Delphi 中声明一般为:   1 TXXX=procedure/function (参数列表); 类的成员函数类的成员函数作为回调函数,与全局函数相比,需要关联具体的类的实例,所以它是由两部分组成,一个是对象的实例地址,一个是代码地址,两个指针,构成一个记录(结构体),参考 Delphi 中 TMethod 的声明:  …
前一阵子,研究了一段时间的Win32Asm,研究到后来发现Win32的ASM实际上还是和C版的介绍的一样.甚至还封装了一个简版的类似VCL库结构框架的32ASM结构库,不过搞着搞着就没兴趣了,也没继续往下深入,唉!发现年龄越来越大,人也越来越懒. 休息了好长一阵子,在乱七八糟的东西乱弄一堆之后,总算发现了一个能有点用处的东西,于是就欣欣然跑来记录一下日志博客以为备份. 我们都知道在Delphi,VC等这类静态检测形的语言,如果要使用一个函数,必须要先申明一下此函数结构,然后调用的时候,编译器才会…
.copy(str,pos,num) 从str字符串的pos处开始,截取num个字符的串返回. 假设str为,)=,)='def' .concat(str1,str2{,strn}) 把各自变量连接起来,返回连接后的字符串(长度不能超过255) .length(str) 返回str的字符个数,即其长度. .pos(obj,target) 在target字符串中找出第一个出现obj的第一个字符位置,如果找不到,返回0. .AnsiStrLastChar('你好')结果是“好”.如果有半个汉字出现,…
--------------------文件操作--------------------函数名称:ChangeFileExt函数说明:更改指定文件的扩展名,函数原型如下:AnsiString __fastcall ChangeFileExt(const AnsiString FileName,const AnsiString Extension); 函数名称:DeleteFile函数说明:在计算机磁盘中删除指定的文件,如果操作成功,则函数返回真,函数原型如下:bool __fastcall De…
本文档是ccrun(老妖)根据网上资料整理而成. --------------------内存分配--------------------函数名称:AllocMem函数说明:在队中分配指定字节的内存块,并将分配的每一个字节初始化为 0.函数原型如下:void * __fastcall AllocMem(Cardinal Size); 函数名称:SysFreeMem函数说明:释放所指定的内存块.函数原型如下:int __fastcall SysFreeMem(void * P); 函数名称:Sys…
function Big5ToUnicode(str Char): widestring; var len: integer; begin len:=MultiByteToWideChar(,,PChar(str),-,); setlength(result,len-); MultiByteToWideChar(, , PChar(str), -, pwidechar(result), len+); result:=' '+result; end; MultiByteToWideChar(950…