[原创] Delphi InputBox、InputQuery函数

Delphi InputBox.InputQuery函数两个函数都是弹框提示输入信息 function InputQuery(const ACaption, APrompt: string; var Value: string): Boolean; // 输出布尔值 function InputBox(const ACaption, APrompt, ADefault: string): string; // 输出文本看一下 InputBox 的函数原型(调用了InputQuer…

[原创] Delphi Win API函数操作帮助文件 HtmlHelpA函数介绍

Delphi Win API函数操作帮助文件 HtmlHelpA函数介绍函数原型:HWND HtmlHelpA( HWND hwndCaller, LPCSTR pszFile, UINT uCommand, DWORD_PTR dwData ); Delphi 中引用:function HtmlHelpA (hwndcaller:Longint; lpHelpFile:string; wCommand:Longint;dwData:string): HWND;stdcall; extern…

Delphi Inputbox,InputQuery用法

Delphi :InputQuery,InputBox用法及区别 function InputQuery(const ACaption, APrompt: string; var Value: string): Boolean; InputQuery返回值为是否点了OK 输入的字符串放在了变量Value中 function InputBox(const ACaption, APrompt, ADefault: string): string; inputBox返回值是字符串,也就是输入的字符串…

Delphi的Trim函数

三个Trim函数简介函数原型 function Trim(const S: string): string; 将字符串前后的空白及控制字元清掉. 注意Trim函数只能清掉字符串前后的空格及控制字元,不能清除字符串中间的空格函数原型 function TrimLeft(const S: string): string; 将字符串左边的空白及控制字元清掉. 函数原型 function TrimRight(const S: string): string; 将字符串右边的空白及控制字元清掉. Tr…

Delphi常用系统函数总结

Delphi常用系统函数总结字符串处理函数 Unit System 函数原型 function Concat(s1 [, s2,..., sn]: string): string; 说明与 S := S1 + S2 + S3 ...; 相同. 将字符串相加. 函数原型 function Copy(S: string; Index, Count: Integer): string;说明 S : 字符串. Indexd : 从第几位开始拷贝. Count : 总共要拷贝几位. 从母字符串拷贝至另…

Delphi中的函数指针判断是否为空

delphi函数指针只有@@p才代表了函数指针本身的地址 assigned(p) 判断是否为空或者用 @p=nil 来判断函数指针是不是为空 Delphi中的函数指针实际上就是指针,只是在使用的时候有些不同函数指针要先定义一个函数类型,比如 type TTestProc = procedure of object; 这是一个最简单的函数类型,没有参数,也没有返回值,并且要求是类的成员函数类的成员函数其实就代表了调用的时候参数的不同,因为类的成员函数隐含着一个对象参数,而不是显式写明,…

Delphi 常用API 函数

Delphi 常用API 函数 AdjustWindowRect 给定一种窗口样式,计算获得目标客户区矩形所需的窗口大小 AnyPopup 判断屏幕上是否存在任何弹出式窗口 ArrangeIconicWindows 排列一个父窗口的最小化子窗口 AttachThreadInput 连接线程输入函数 BeginDeferWindowPos 启动构建一系列新窗口位置的过程 BringWindowToTop 将指定的窗口带至窗口列表顶部 CascadeWindows 以层叠方式排列窗口 ChildWi…

Delphi中 StrToIntDef函数的用法

Delphi中 StrToIntDef函数的用法:比如我要判断一个文本框里输入的字符串能不能转换为integer类型,如果能,则返回转换后的整型数据,如果不能,则返回整数0,那么我就可以用strtointdef这个函数.写法如下:假设edit1.text:='1000';则strtointdef(edit1.text,0)返回值为1000.如果edit1.text:='fdafds',则返回值为0.(如果你用strtoint(edit1.text)当edit1.text:='fdads'时会报错…

Delphi - Windows系统下，Delphi调用API函数和7z.dll动态库，自动把文件压缩成.tar.gz格式的文件

项目背景应欧美客户需求,需要将文件压缩成.tar.gz格式的文件,并上传给客户端SFTP服务器. 你懂的,7-Zip软件的显著特点是文件越大压缩比越高,在Linux系统上相当于我们Windows系统上WinRAR或者好压软件一样的存在. 7-Zip软件下载与安装网上下载相关安装包并完成安装,找到安装目录,复制7z.dll文件到D盘. .bat文件的制作通过7-Zip软件使用手册了解到,通过动态命令行调用7z.dll可以把文件压缩成.tar.gz格式的,实际上是先将文件压缩成.tar格式的文…

delphi字符串分隔函数用法实例

这篇文章主要介绍了delphi字符串分隔函数用法,通过自定义函数SeparateTerms2实现将字符串分割后存入字符串列表的功能,具有一定的实用价值,需要的朋友可以参考下本文实例讲述了delphi字符串分隔函数用法.分享给大家供大家参考.具体实现方法如下: 该实例可实现根据字符串Separator的表示将字符串s分隔为若干个字符串,存入rs字符串列表中,具体代码如下 procedure SeparateTerms2(s:string;Separator:string;var rs:TStri…

Delphi Win API 函数 MulDiv

Delphi Win API 函数 MulDiv 原型:function MulDiv(nNumber, nNumerator, nDenominator: Integer): Integer; stdcall; 例如:MulDiv(a, b, c) ; 计算相当于 a*b/c 或 a*b div c 计算的结果有两个特点: 1.计算的值自动会四舍五入: 2.超出计算或无法计算的值输出值: -1 更新日期:2019.12.19 来源:https://www.cnblogs.com/guoron…

Delphi 常用API 函数列表

Delphi 常用API 函数 AdjustWindowRect 给定一种窗口样式,计算获得目标客户区矩形所需的窗口大小AnyPopup 判断屏幕上是否存在任何弹出式窗口ArrangeIconicWindows 排列一个父窗口的最小化子窗口AttachThreadInput 连接线程输入函数BeginDeferWindowPos 启动构建一系列新窗口位置的过程BringWindowToTop 将指定的窗口带至窗口列表顶部CascadeWindows 以层叠方式排列窗口ChildWindowFro…

Delphi常用字符串函数

Delphi常用字符串函数一.字符转换函数1.ord(input[i])返回字符表达式 input 左端起第 I 字符的ASCII 码值.2.CHAR()将ASCII 码转换为字符.如果没有输入0 ~ 255 之间的ASCII 码值,CHAR() 返回NULL .3.LOWER()和UPPER()LOWER()将字符串全部转为小写:UPPER()将字符串全部转为大写.4.STR()把数值型数据转换为字符型数据.STR (<float_expression>[,length[, <d…

Delphi中Inputbox 和Inputquery 函数的使用

原文转自:http://blog.csdn.net/zengcong2013/article/details/18355959 inputbox的返回值是,你在输入框中输入的文字.而inputquery的返回值是,你是否点击了确定按钮.它的返回值是布尔型的.如果你在inputbox中一样也不输入,就点击取消的话,就会提示出错,而inputquery就不会.它们前面的两个参数都是一样的,分别是输入框的标题,和提示信息.例:if inputbox('加法题','7+5','')='12' then …

[原创]Delphi 文件函数：ForceDirectories() 函数和 CreateDir函数

引用单元:SysUtils function ForceDirectories(Dir: string): Boolean; //创建多级目录父目录不必存在 (Force 有暴力.强制的意思) function CreateDir(const Dir: string): Boolean; //创建一级目录父目录必需存在例如:D:\文档\计算机\我的delphi\我的制作不存在的文件目录有 :计算机\我的delphi\我的制作 ForceDirectories 函…

[原创]Delphi 字符串函数（字符串判断 TryStrToFloat 、TryStrToInt、TryStrToInt64、TryStrToBool、TryStrToCurr、TryStrToDate、TryStrToTime、TryStrToDateTime）

引用单元SysUtils TryStrToFloat .TryStrToInt.TryStrToInt64.TryStrToBool.TryStrToCurr.TryStrToDate.TryStrToTime.TryStrToDateTime 将字符串转换成其中一种格式,转换成功返回true,否则false 例如: TryStrToFloat函数示例: var aa:Extended; begin if TryStrToFloat('12.3456',aa) then ShowMessage…

转：Delphi 6 实用函数

来自: daocaoren0824, 时间: -- ::, ID: 再给你一份程序员实用函数 {▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎} {▎ ▎} {▎ 大家都是程序员没有必要重复一些无聊的事情我的这些函数能给大家带来方便 ▎} {▎ 如果觉得还一般请关注 WWW.cdsunco.com/www.ccemove.com QQ:35013354 ▎} {▎ 系统公用函数及过程 ▎} {▎ ▎} {▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎…

Delphi文件操作函数

文件是同一种类型元素的有序集合,是内存与外设之间传输数据的渠道.文件的本质是一个数据流,所有的文件实际上是一串二进制序列.文件管理包括:1.文件操作.2.目录操作.3.驱动器操作.三部分. 1.常见文件操作函数和过程.1.1.AssignFile过程作用:将一个外部文件的文件名与一个File类型的变量关联,并对变量进行初始化.原型:procedure AssignFile(var F; FileName: String);F:一个File类型的变量,可以是任何数据类型.FileName:外部文件…

Delphi 过程与函数

注:该内容整理自以下链接. http://chanlei001.blog.163.com/blog/static/340306642011111615445266/ delphi 过程以保留字procedure开始,没有返回值:函数以保留字function开始,有返回值.过程参数位于括号里面,多个参数之间以分号分隔,例如: procedure SetDate(Year: Integer; Month: Integer; Day: Integer); 也可以将相同类型的参数组合在一起,则上述过程标…

Delphi 使用之函数

函数由一句或多句代码组成,可以实现某个特定的功能.使用函数可以使代码更加易读.易懂,加快编程速度及减少重复代码.过程与函数类似,过程与函数最重要的区别在于,过程没有返回值,而函数能有返回值. 本文整理自以下链接 http://blog.sina.com.cn/s/blog_40a8922201000py6.html http://blog.163.com/jiandande3218@126/blog/static/74728469201132715251648/ PASCAL函数过程表…

Delphi调用外部程序函数：WinExec() 和ShellExecute详解

1,WinExec(): WinExec主要运行EXE文件,不能运行其他类型的文件.不用引用特别单元. 原型:UINT WinExec(exePath,ShowCmd) 示例,我想要用记事本打开"C:\HDC.TXT",以正常方式运行:WinExec(pChar('notepad c:\taoyoyo.txt'),SW_SHOWNORMAL); 参数说明: --xePath:命令行参数.注意,要用pChar转化一下. --ShowCmd:外部程序的运行方式.其取值如下…

Delphi的四舍五入函数

一.四舍五入法四舍五入是一种应用非常广泛的近似计算方法,其有算术舍入法和银行家舍入法两种. 所谓算术舍入法,就是我们通常意义上的四舍五入法.其规则是:当舍去位的数值大于等于5时,在舍去该位的同时向前位进一:当舍去位的数值小于5时,则直接舍去该位. 所谓银行家舍入法,其实质是一种四舍六入五留双(又称四舍六入五奇偶)法.其规则是:当舍去位的数值小于5时,直接舍去该位:当舍去位的数值大于等于6时,在舍去该位的同时向前位进一:当舍去位的数值等于5时,如果前位数值为奇,则在舍去该位的同…

Delphi过程和函数中变量的作用域

变量的作用域是指变量能被某一子程序识别的范围. 全局变量和局部变量.全局变量是指在程序的type区定义的变量,而局部变量是在过程或函数的定义部分声明的变量.全局变量在整个程序中都有意义,局部变量只在它所在的过程和函数中有意义.如果全局变量和局部变量同名,那么在函数或过程中是局部变量优先,在此之外是全局变量发挥作用--但应该避免.delphi可以把和函数作为一个整体赋给某个变量,或者把这个变量作为参数传递给其他的过程和函数,即过程类型可以被赋值.…

delphi调用LUA函数来处理一些逻辑

替同事做了个洛奇英雄传自动染色程序,关于屏幕取色的. 因为里面他对颜色的要求比较复杂,改动也比较大,于是我让他把逻辑写在 lua 脚本里面. uses LUA, LUALIB; function lua_CheckColor(r,g,b:Integer):Boolean; var Lua : TLua; begin Lua := TLua.Create; luaopen_debug(LuaInstance); //如果要使用debug库 // luaopen_io(LuaInstance);…

【delphi】Delphi过程、函数传递参数的八种方式

Delphi过程函数传递参数的八种方式…

Delphi Math单元函数

本文转至http://blog.sina.com.cn/s/blog_976ba8a501010vvf.html 这个单元包含高性能的算术.三角.对数.统计和金融方面的计算及FPU程序函数用于补充Delphi语言System.pas 单元中的数学常规程序函数注意1) 对于有些函数,这个单元中涉及的概念或常数由Earl F. Glynn (www.efg2.com) 和 Ray Lischner (www.tempest-sw.com)提供.2) 所有的角度参数三角函数的结果都用弧度表示3) 下列…

Delphi字符串处理函数

1.Copy 功能说明:该函数用于从字符串中复制指定范围中的字符.该函数有3个参数.第一个参数是数据源(即被复制的字符串),第二个参数是从字符串某一处开始复制,第三个参数是要复制字符串的长度(即个数).最后函数返回一个新的字符串(即是我们指定要复制的字符串内容). 参考实例: var S: String; MyStr: String; // 保存新的字符串 begin S := 'I Love China!'; //下面将获取I Love China中的“Love”字符串. MyStr := C…