原文:Delphi中AssignFile函数

procedure TForm .SaveLog sFlag:string MSG:string var QF :Textfile 声明文本文件类型 Qfiletmp,sPath:string begin try sPath : ExtractFileDir ParamStr Sajet Log if not directoryExists sPath then begin forcedirect ...

2019-11-07 11:51 0 660 推荐指数:

查看详情

DELPHI调用API函数

一、概述   Delphi作为一种面向对象的可视化开发工具,以其开发程序的高速度和编译代码的高效率越来越受到广大编程人员的喜爱。Delphi本身提供了包括界面设计、数据库操作、报表打印和Internet等在内的数十个组件,开发者使用它们可以非常容易、快速地制作出所要的应用系统,同时所需要的编程量 ...

Fri Mar 11 01:13:00 CST 2022 0 951
改进delphi的RoundTo函数

delphi 7自带数值四舍五入函数RoundTo(AVlaue, ADigit)存在一些不确定性情况,并非像帮助或者网络说的四舍六入五凑偶的规则,不信可以随便测试几个数据就会发现与你预期的不一样,比如33.015与33.035,修约2位小数,运行结果却是33.01与33.03。这主要 ...

Sat Dec 01 04:46:00 CST 2012 0 6699
delphi的copy函数和pos函数

1、copy(‘csdn’,1,2) 返回的结果是 cs 注释: Copy有3个参数,第一个是要处理的字符串,第二个是要截取的开始位置,第三个是截取位数 当第三个参数大于字 ...

Thu Jan 19 09:11:00 CST 2017 0 1840
Delphi7函数与过程(Function and Procedure)

1.锁住空间的位置,可以选择Edit--->Lock component ,也可以在窗体设计面板下面找到组件排版功能栏,第二排里面有个带锁的图标,表示组件可以被锁住。点击一下,组件的大小和位置就 ...

Tue Oct 09 08:58:00 CST 2018 0 1116
delphipos和Ansipos函数的区别

POS和ANSIPOS的主要区别在于,POS参数多用于是一个字符,而ANSIPOS多用于是多个字符: 例如:i:=pos('a','sssssas'); i:=ansipos('abc' ...

Wed Dec 21 09:51:00 CST 2016 0 5617
delphi unicode 转汉字 函数

近期用到这个函数,无奈没有找到 delphi 自带的,网上找了下 有类似的,没有现成的,我需要的是 支持 “\u4f00 ” 这种格式的,即前面带标准的 “\u” 于是改造了一下。 下面是 解码 函数: 方便有需要的人吧,我自己也需要^_^ ...

Wed Feb 11 23:30:00 CST 2015 1 3532
delphimove 函数额用法

,而不是传地址,但是各位别忘了,这不是C,C++,而是Delphi Object Pascal,所以,绝不 ...

Thu Mar 15 22:41:00 CST 2012 0 5035
 
粤ICP备18138465号  © 2018-2025 CODEPRJ.COM