Delphi标准函数.docx
- 文档编号:10009110
- 上传时间:2023-02-07
- 格式:DOCX
- 页数:109
- 大小:55.41KB
Delphi标准函数.docx
《Delphi标准函数.docx》由会员分享,可在线阅读,更多相关《Delphi标准函数.docx(109页珍藏版)》请在冰豆网上搜索。
Delphi标准函数
[标准函数和过程]
首部procedureAbort;$[SysUtils
功能引起放弃的意外处理。
说明不显示任何错误信息。
首部functionAbs(N:
功能返回参数N的绝对值。
说明函数结果与参数有相同类型,参数可以是整型也可以是浮点型。
##Abs(-12)=12;Abs(-12.03)=12.03
首部procedureAddExitProc(Proc:
TProcedure);$[SysUtils
功能将旧版本某一过程添加到当前版本运行的库的结束过程表中。
说明只能向下兼容,不能用在当前使用版本的
首部functionAddr(X):
Pointer;$[System
功能返回指定对象的内存地址。
说明地址运算符@可以产生与Addr相同的结果。
首部procedureAddTerminateProc(TermProc:
TTerminateProc);$[SysUtils
功能将一过程添加到运行时库的终止过程表中。
说明Delphi在程序结束时将终止该程序的全部进程,可以终止的进程都放在终止过程表中,
程序通过结束终止过程表所有的进程来实现终止全部进程的目的。
首部functionAdjustLineBreaks(constS:
string):
string;$[SysUtils
功能将给定字符串的行分隔符调整为Cr/Lf序列。
说明
首部functionAllocMem(Size:
Cardinal):
Pointer;$[SysUtils
功能在堆栈上分配给定大小为Size字节的块,即在内存里开辟Size大小的空间。
说明Cardinal0..429496729532位无符号整数
首部functionAnsiCompareFileName(constS1,S2:
string):
Integer;$[SysUtils
功能比较两个文件名的大小。
不区分大小写。
说明条件返回值
S1>S2|>0
S1 S1=S2|=0 首部functionAnsiCompareStr(constS1,S2: string): Integer;$[SysUtils 功能比较两个字符串的大小。 要区分大小写。 说明参见AnsiCompareFileName。 首部functionAnsiCompareText(constS1,S2: string): Integer;$[SysUtils 功能返回两个字符串是否相同的状态。 不区分大小写。 说明参见AnsiCompareFileName。 首部functionAnsiExtractQuotedStr(varSrc: PChar;Quote: Char): string;$[SysUtils 功能将引用字串转换成结束引语返回。 说明函数支持多字节字符系统[MBCS]。 首部functionAnsiLastChar(constS: string): PChar;$[SysUtils 功能取参数S的最后一个字符,并转换成以null结束的字符串指针返回。 说明##AnsiLastChar(‘Sysoft’)={‘t\0’}; 首部functionAnsiLowerCase(constS: string): string;$[SysUtils 功能将字符串S转换为小写返回。 说明函数支持多字节字符系统[MBCS]。 首部functionAnsiLowerCaseFileName(constS: string): string;$[SysUtils 功能将文件名S转换成小写返回 说明函数支持多字节字符系统[MBCS]。 首部functionAnsiPos(constSubstr,S: string): Integer;$[SysUtils 功能返回子串Substr出现在主串S中的第一个位置。 说明 首部functionAnsiQuotedStr(constS: string;Quote: Char): string;$[SysUtils 功能返回引用字串的译文 说明 首部functionAnsiStrComp(S1,S2: PChar): Integer;$[SysUtils 功能比较两个指针字符串的大小。 要区分大小写。 说明参见AnsiCompareFileName。 首部functionAnsiStrIComp(S1,S2: PChar): Integer;$[SysUtils 功能比较两个指针字符串的大小。 不区分大小写。 说明参见AnsiCompareFileName。 首部functionAnsiStrLastChar(P: PChar): PChar;$[SysUtils 功能返回字符串指针气所指向的最后一个字符位置 说明 首部functionAnsiStrLComp(S1,S2: PChar;MaxLen: Cardinal): Integer;$[SysUtils 功能在最大长度MaxLen的范围内比较两个指针字符串的大小。 要区分大小写。 说明参见AnsiCompareFileName。 首部functionAnsiStrLIComp(S1,S2: PChar;MaxLen: Cardinal): Integer;$[SysUnits 功能在最大长度MaxLen的范围内比较两个指针字符串的大小。 不区分大小写。 说明参见AnsiCompareFileName。 首部functionAnsiStrLower(Str: PChar): PChar;$[SysUtils 功能将指针字符串S转换为小写返回。 说明 首部functionAnsiStrPos(Str,SubStr: PChar): PChar;$[SysUtils 功能在指针字符串中返回子串Substr出现在主串S中的第一个位置。 说明 首部functionAnsiStrRScan(Str: PChar;Chr: Char): PChar;$[SysUtils 功能返回以字符Chr在指针字符串Str中的最后一个位置为起始位置的指针字符串 说明##AnsiStrRScan(‘Zswangs1234567’,‘s’)=‘s1234567’; 首部functionAnsiStrScan(Str: PChar;Chr: Char): PChar;$[SysUtils 功能返回以字符Chr在指针字符串Str中的第一个位置为起始位置的指针字符串 说明##AnsiStrScan(‘Zswangs1234567’,‘s’)=‘swangs1234567’; 首部functionAnsiStrUpper(Str: PChar): PChar;$[SysUtils 功能将指针字符串S转换成大写返回。 说明 首部functionAnsiToNative(Locale: TLocale;constAnsiStr: string;NativeStr: PChar;MaxLen: Integer): PChar;$[SysUtils 功能将字符串集转换成现场数据返回 说明typeTLocale=Pointer; 首部procedureAnsiToNativeBuf(Locale: TLocale;Source,Dest: PChar;Len: Integer);$[SysUtils 功能将字符串集转换成现场数据 说明 首部functionAnsiUpperCase(constS: string): string;$[SysUtils 功能将字符转换为大写返回。 说明 首部functionAnsiUpperCaseFileName(constS: string): string;$[SysUtils 功能将文件名转换为大写返回。 说明 首部procedureAppend(varF: Text);$[System 功能以附加的方式打开已有的文件。 说明调用Append前,F必须已与一个外部文件相联系。 对用Append打开的文件,仅有合法操作是调用Write或Writeln。 首部procedureAppendStr(varDest: string;constS: string);$[SysUtils 功能将字串S添加到字串Dest中。 [即运行: Dest: =Dest+s;] 说明##AppendStr(‘Sysoft’,‘1999’)=‘Sysoft1999’; 首部functionArcCos(X: Extended): Extended;$[Math 功能返回X参数的反余弦值。 说明函数结果取弧度值。 首部functionArcCosh(X: Extended): Extended;$[Math 功能返回X参数的反双曲余弦值。 说明函数结果取弧度值。 首部functionArcSin(X: Extended): Extended;$[Math 功能返回X参数的反正弦值。 说明函数结果取弧度值。 首部functionArcSinh(X: Extended): Extended;$[Math 功能返回X参数的反双曲正弦值。 说明函数结果取弧度值。 首部functionArcTan(X: Extended): Extended;$[System 功能返回参数X的反正切函数值。 说明函数结果取弧度值。 首部functionArcTan2(Y,X: Extended): Extended;$[Math 功能返回参数Y除于X参数的反正切函数值。 {即: 返回ArcTan(Y/X)} 说明函数结果取弧度值。 首部functionArcTanh(X: Extended): Extended;$[Math 功能返回参数X的反双曲正切函数值。 说明函数结果取弧度值。 首部procedureAssert(expr: Boolean[;constmsg: string]);$[System 功能测试布尔表达式是否成功 说明$ASSERTIONSON/OFF|(longform) $C+/-|(shortform) 首部functionAssigned(varP): Boolean;$[System 功能返回变体是否非空。 说明##ifAssigned(Edit1)thenEdit1.Free; 首部procedureAssignFile(varF;FileName: string);$[System 功能给文件变量赋一外部文件名。 说明用F文件变量打开FileName名字的文件 首部procedureAssignPrn(varF: Text);$[Printers 功能指定文本变量F的打印机 说明 首部procedureAssignStr(varP: PString;constS: string);$[SysUtils 功能将字符串列入指针 说明PString是AnsiString指针 首部procedureAssociateAttr(constAttrID: TAttrID;constFieldID: TFieldID);$[DRIntf 功能将ID属性和事件关联 说明type TID=recordReseved: array[1..6]ofByte;end; TFieldID=typeTID; TAttrID=typeTID; 首部procedureBeep;$[SysUtils 功能产生一个标准的电脑发声beep。 说明这个Beep过程使用了Windows下的API函数MessageBeep。 首部functionBeginThread(SecurityAttributes: Pointer;StackSize: LongWord;ThreadFunc: TThreadFunc;Parameter: Pointer;CreationFlags: LongWord;varThreadId: LongWord): Integer;$[SysUtils 功能以适当的方式建立用于内存管理的线程。 说明 首部procedureBindStub(RepositoryID,InstanceName,HostName: PChar;constOrb: IORB;RefCountServer: CorbaBoolean;outStub: IStub);$[orbpas 功能获得界面CORBA服务器的对象作为IStub界面 说明[CORBA]: 程序体系结构 首部procedureBlockRead(varF: File;varBuf: Integer[;varAmtTransferred: Integer]);$[System 功能从无类型文件F中读出Count个记录赋予变量Buf。 说明可选参数AmtTransferred表示实际读取的记录个数。 一般一个记录系指包含128字节的块,但可使用带有可选参数的Reset来改变从128到不同字节块大小。 首部procedureBlockWrite(varF: File;varBuf: Integer[;varAmtTransferred: Integer]);$[System 功能把从变量Buf第一个字节开始的Count个记录写入无类型文件F中。 说明可选参数AmtTransferred表示实际读取的记录个数。 一般一个记录系指包含128字节的块,但可使用带有可选参数的Rewrite来改变从128到不同字节块大小。 首部functionBounds(ALeft,ATop,AWidth,AHeight: Integer): TRect;$[Classes 功能返回指定坐标和范围的TRect数据 说明type TPoint=record X: Longint; Y: Longint; end; TRect=record caseIntegerof 0: (Left,Top,Right,Bottom: Integer); 1: (TopLeft,BottomRight: TPoint); end; 首部procedureBreak;$[System 功能提前中止循环。 说明用于for、while、repeat-until中。 首部functionByteToCharIndex(constS: string;Index: Integer): Integer;$[SysUtils 功能返回索引Index的真实值 说明如果Index小于和大于S的长度则返回0##ByteToCharIndex(‘12345678’,9)=0; 首部functionByteToCharLen(constS: string;MaxLen: Integer): Integer;$[SysUtils 功能返回字符的编号 说明如果Index小于S的长度则返回0;如果Index大于S的长度则返回MaxLen;##ByteToCharLen(‘12345678’,9)=9; 首部functionByteType(constS: string;Index: Integer): TMbcsByteType;$[SysUtils 功能返回字符串指定位置的字节类型 说明typeTMbcsByteType=(mbSingleByte,mbLeadByte,mbTrailByte);##ByteType(‘国庆节12’,1)=mbLeadByte; 首部procedureCancelDrag;$[Controls 功能在程序运行中取消拖放操作 说明 首部functionCeil(X: Extended): Integer;$[Math 功能返回参数X的正取整值 说明##Ceil(-2.8)=-2;Ceil(2.8)=3;Ceil(-1.0)=-1; 首部functionChangeFileExt(constFileName,Extension: string): string;$[SysUtils 功能改变文件的后缀返回。 说明##ChangeFileExt(‘zs.txt’,’.ini’)=‘zs.ini’; 首部functionCharsetToIdent(Charset: Longint;varIdent: string): Boolean;$[Graphics 功能获得字符集的名称 说明如果获得成功则返回True,否则返回False 首部functionCharToByteIndex(constS: string;Index: Integer): Integer;$[SysUtils 功能返回字符串基于索引Index的真实位置 说明如果Index小于和大于S的长度则返回0 首部functionCharToByteLen(constS: string;MaxLen: Integer): Integer;$[SysUtils 功能返回字符串基于索引Index的编号 说明如果Index小于S的长度则返回0;如果Index大于S的长度则返回MaxLen; 首部procedureChDir(Path: 功能改变当前目录 说明检查IOResult可确定此改变是否成功。 IOResult的值非零时表示Path不存在。 首部procedureCheck(Status: Integer);$[DBTables 功能以变量来确定BDE抗议错误状态 说明[BDE(BorlandDatabaseEngine)]: 宝兰德数据库引擎 首部functionChr(N: Byte): Char;$[System 功能返回参数N的ASCII字符值。 说明参数N表示某ASCII代码的序号数值(0-255)。 首部functionClassIDToProgID(constClassID: TGUID): string;$[ComObj 功能返回标题音乐的ID所指定类字串 说明type PGUID=^TGUID; TGUID=record D1: Longword; D2: Word; D3: Word; D4: array[0..7]ofByte; end; 错误代码含义 REGDB_E_CLASSNOTREG|Classnotregisteredintheregistry. REGDB_E_READREGDB|Errorreadingregistry. 首部functionClipboard: TClipboard;$[clipbrd 功能返回当前剪贴板的数据 说明 首部procedureClose(varF: 功能关闭文件F。 说明文件F必须已被Reset、Rewrite或Append打开,且没有关闭。 欲关闭一个未打开的文件或已关闭的文件都是错误的。 首部procedureCloseFile(varF: 功能终止文件变量F与外部文件的联系 说明当编译指令{$I}打开的时候,可用IOResult来检查终止是否成功 首部functionCollectionsEqual(C1,C2: TCollection): Boolean;$[Classes 功能比较两个收集变量是否相同 说明 首部functionColorToIdent(Color: Longint;varIdent: string): Boolean;$[Graphics 功能返回是否成功的获取了颜色的名称 说明##vars,Ident: string;begins: =‘Nose’;ifColorToIdent(clBlack,Ident)thens: =Ident; 首部functionColorToRGB(Color: TColor): Longint;$[Graphics 功能将颜色类型转换成RGB格式返回 说明typeTColor=-(COLOR_ENDCOLORS+1)..$02FFFFFF; 便于WindowsAPI函数调用 首部functionColorToString(Color: TColor): string;$[Graphics 功能将颜色参数Color转换成字符串类型返回 说明如果Color有系统设定的颜色则返回该名称,否则返回其16进制形式##ColorToString(clBlack)=‘clBlak’;ColorToString(12)=‘$0000000C’; 首部functionComClassManager: TComClassManager;$[ComObj 功能返回一个TComClassManager类 说明 首部functionCompareMem(P1,P2: Pointer;Length: Integer): Boolean;assembler;$[SysUtils 功能在指定内存范围Length比较两个指镇的内容是否相同。 说明范围以二进制为单位。 首部functionCompareStr(constS1,S2: string): Integer;$[SysUtils 功能比较两个字符串的大小。 要区分大小写。 说明 首部functionCompareText(constS1,S2: string): Integer;$[SysUtils 功能比较两个字符串的大小。 不区分大小写。 说明 首部functionConcat(S1[,S2,...,Sn]: string;$[System1 功能把字串S1[,S2,...,Sn]连接成一个单一的字串。 说明除此之外,还可以用运算符+来连接。 首部procedureContinue;$[System 功能离开本次循环,转到下一次循环 说明 首部f
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- Delphi 标准 函数