函數(shù)集.doc
約42頁(yè)DOC格式手機(jī)打開(kāi)展開(kāi)
函數(shù)集,頁(yè)數(shù)：42字?jǐn)?shù)：21585[標(biāo)準(zhǔn)函數(shù)和過(guò)程]首部procedure abort;$[sysutils功能引起放棄的意外處理。說(shuō)明不顯示任何錯(cuò)誤信息。首部function abs(n: ): ;$[system功能返回參數(shù)n的絕對(duì)值。說(shuō)明函數(shù)結(jié)果與參數(shù)有相同類型，參數(shù)可以是整型也可以是浮點(diǎn)型。## abs(-12)...
內(nèi)容介紹
此文檔由會(huì)員 cnlula 發(fā)布
函數(shù)集
頁(yè)數(shù)：42 字?jǐn)?shù)：21585
[標(biāo)準(zhǔn)函數(shù)和過(guò)程]
首部 procedure Abort;$[SysUtils
功能 引起放棄的意外處理。
說(shuō)明 不顯示任何錯(cuò)誤信息。
首部 function Abs(N:): ;$[System
功能 返回參數(shù)N的絕對(duì)值。
說(shuō)明 函數(shù)結(jié)果與參數(shù)有相同類型，參數(shù)可以是整型也可以是浮點(diǎn)型。
## Abs(-12) = 12；Abs(-12.03) = 12.03
首部 procedure AddExitProc(Proc: TProcedure);$[SysUtils
功能 將舊版本某一過(guò)程添加到當(dāng)前版本運(yùn)行的庫(kù)的結(jié)束過(guò)程表中。
說(shuō)明 只能向下兼容，不能用在當(dāng)前使用版本的
首部 function Addr(X): Pointer;$[System
功能 返回指定對(duì)象的內(nèi)存地址。
說(shuō)明 地址運(yùn)算符 @ 可以產(chǎn)生與Addr相同的結(jié)果。
首部 procedure AddTerminateProc(TermProc: TTerminateProc);$[SysUtils
功能 將一過(guò)程添加到運(yùn)行時(shí)庫(kù)的終止過(guò)程表中。
說(shuō)明 Delphi 在程序結(jié)束時(shí)將終止該程序的全部進(jìn)程，可以終止的進(jìn)程都放在終止過(guò)程表中，
程序通過(guò)結(jié)束終止過(guò)程表所有的進(jìn)程來(lái)實(shí)現(xiàn)終止全部進(jìn)程的目的。
首部 function AdjustLineBreaks(const S: string): string;$[SysUtils
功能 將給定字符串的行分隔符調(diào)整為Cr/Lf序列。
說(shuō)明
首部 function AllocMem(Size: Cardinal): Pointer;$[SysUtils
功能 在堆棧上分配給定大小為 Size字節(jié)的塊，即在內(nèi)存里開(kāi)辟Size 大小的空間。
說(shuō)明 Cardinal 0..4294967295 32位無(wú)符號(hào)整數(shù)
首部 function AnsiCompareFileName(const S1, S2: string): Integer;$[SysUtils
功能 比較兩個(gè)文件名的大小。不區(qū)分大小寫。
說(shuō)明 條件 返回值
S1 > S2 | > 0
S1 < S2 | < 0
S1 = S2 | = 0
首部 function AnsiCompareStr(const S1, S2: string): Integer;$[SysUtils
功能 比較兩個(gè)字符串的大小。要區(qū)分大小寫。
說(shuō)明 參見(jiàn)AnsiCompareFileName。
首部 function AnsiCompareText(const S1, S2: string): Integer;$[SysUtils
功能 返回兩個(gè)字符串是否相同的狀態(tài)。不區(qū)分大小寫。
說(shuō)明 參見(jiàn)AnsiCompareFileName。
首部 function AnsiExtractQuotedStr(var Src: PChar; Quote: Char):string;$[SysUtils
功能 將引用字串轉(zhuǎn)換成結(jié)束引語(yǔ)返回。
說(shuō)明 函數(shù)支持多字節(jié)字符系統(tǒng)[MBCS]。
首部 function AnsiLastChar(const S: string): PChar;$[SysUtils
功能 取參數(shù)S的最后一個(gè)字符，并轉(zhuǎn)換成以null結(jié)束的字符串指針?lè)祷亍?br>說(shuō)明 ##AnsiLastChar(‘Sysoft’) = {‘t0’};
首部 function AnsiLowerCase(const S: string): string;$[SysUtils
功能 將字符串S轉(zhuǎn)換為小寫返回。
說(shuō)明 函數(shù)支持多字節(jié)字符系統(tǒng)[MBCS]。
首部 function AnsiLowerCaseFileName(const S: string): string;$[SysUtils
功能 將文件名S轉(zhuǎn)換成小寫返回
說(shuō)明 函數(shù)支持多字節(jié)字符系統(tǒng)[MBCS]。
首部 function AnsiPos(const Substr, S: string): Integer; $[SysUtils
功能 返回子串Substr出現(xiàn)在主串S中的第一個(gè)位置。
說(shuō)明
首部 function AnsiQuotedStr(const S: string; Quote: Char): string; $[SysUtils
功能 返回引用字串的譯文
說(shuō)明
首部 function AnsiStrComp(S1, S2: PChar): Integer; $[SysUtils
功能 比較兩個(gè)指針字符串的大小。要區(qū)分大小寫。
說(shuō)明 參見(jiàn)AnsiCompareFileName。
首部 function AnsiStrIComp(S1, S2: PChar): Integer; $[SysUtils
功能 比較兩個(gè)指針字符串的大小。不區(qū)分大小寫。
說(shuō)明 參見(jiàn)AnsiCompareFileName。
首部 function AnsiStrLastChar(P: PChar): PChar; $[SysUtils
功能 返回字符串指針氣所指向的最后一個(gè)字符位置
說(shuō)明
首部 function AnsiStrLComp(S1, S2: PChar; MaxLen: Cardinal): Integer; $[SysUtils
功能 在最大長(zhǎng)度MaxLen的范圍內(nèi)比較兩個(gè)指針字符串的大小。要區(qū)分大小寫。
說(shuō)明 參見(jiàn)AnsiCompareFileName。
首部 function AnsiStrLIComp(S1, S2: PChar; MaxLen: Cardinal): Integer; $[SysUnits
功能 在最大長(zhǎng)度MaxLen的范圍內(nèi)比較兩個(gè)指針字符串的大小。不區(qū)分大小寫。
說(shuō)明 參見(jiàn)AnsiCompareFileName。
首部 function AnsiStrLower(Str: PChar): PChar; $[SysUtils
功能 將指針字符串S轉(zhuǎn)換為小寫返回。
說(shuō)明
首部 function AnsiStrPos(Str, SubStr: PChar): PChar; $[SysUtils
功能 在指針字符串中返回子串Substr出現(xiàn)在主串S中的第一個(gè)位置。
說(shuō)明
首部 function AnsiStrRScan(Str: PChar; Chr: Char): PChar; $[SysUtils
功能 返回以字符Chr在指針字符串Str中的最后一個(gè)位置為起始位置的指針字符串
說(shuō)明 ## AnsiStrRScan(‘Zswangs1234567’, ‘s’) = ‘s1234567’;
首部 function AnsiStrScan(Str: PChar; Chr: Char): PChar; $[SysUtils
功能 返回以字符Chr在指針字符串Str中的第一個(gè)位置為起始位置的指針字符串
說(shuō)明 ## AnsiStrScan(‘Zswangs1234567’, ‘s’) = ‘swangs1234567’;
首部 function AnsiStrUpper(Str: PChar): PChar; $[SysUtils
功能 將指針字符串S轉(zhuǎn)換成大寫返回。
說(shuō)明
首部 function AnsiToNative(Locale: TLocale; const AnsiStr: string; NativeStr: PChar; MaxLen: Integer): PChar; $[SysUtils
功能 將字符串集轉(zhuǎn)換成現(xiàn)場(chǎng)數(shù)據(jù)返回
說(shuō)明 type TLocale = Pointer;
首部 procedure AnsiToNativeBuf(Locale: TLocale; Source, Dest: PChar; Len: Integer); $[SysUtils
功能 將字符串集轉(zhuǎn)換成現(xiàn)場(chǎng)數(shù)據(jù)
說(shuō)明
首部 function AnsiUpperCase(const S: string): string; $[SysUtils
功能 將字符轉(zhuǎn)換為大寫返回。
說(shuō)明
首部 function AnsiUpperCaseFileName(const S: string): string; $[SysUtils
功能 將文件名轉(zhuǎn)換為大寫返回。
說(shuō)明
首部 procedure Append(var F: Text); $[System
功能 以附加的方式打開(kāi)已有的文件。
說(shuō)明 調(diào)用Append前，F(xiàn)必須已與一個(gè)外部文件相聯(lián)系。對(duì)用Append打開(kāi)的文件，僅有合法操作是調(diào)用Write或Writeln。
首部 procedure AppendStr(var Dest: string; const S: string); $[SysUtils
功能 將字串S添加到字串Dest中。[即運(yùn)行: Dest := Dest + s;]
說(shuō)明 ## AppendStr(‘Sysoft’, ‘1999’) = ‘Sysoft1999’;
首部 function ArcCos(X: Extended): Extended; $[Math
功能 返回X參數(shù)的反余弦值。
說(shuō)明 函數(shù)結(jié)果取弧度值。
首部 function ArcCosh(X: Extended): Extended; $[Math
功能 返回X參數(shù)的反雙曲余弦值。
說(shuō)明 函數(shù)結(jié)果取弧度值。
首部 function ArcSin(X: Extended): Extended; $[Math
功能 返回X參數(shù)的反正弦值。
說(shuō)明 函數(shù)結(jié)果取弧度值。
首部 function ArcSinh(X: Extended): Extended; $[Math
功能 返回X參數(shù)的反雙曲正弦值。
說(shuō)明 函數(shù)結(jié)果取弧度值。
首部 function ArcTan(X: Extended): Extended; $[System
功能 返回參數(shù)X的反正切函數(shù)值。
說(shuō)明 函數(shù)結(jié)果取弧度值。
首部 function ArcTan2(Y, X: Extended): Extended; $[Math
功能 返回參數(shù)Y除于X參數(shù)的反正切函數(shù)值。{即：返回ArcTan(Y/X)}
說(shuō)明 函數(shù)結(jié)果取弧度值。
首部 function ArcTanh(X: Extended): Extended; $[Math
功能 返回參數(shù)X的反雙曲正切函數(shù)值。
說(shuō)明 函數(shù)結(jié)果取弧度值。
首部 procedure Assert(expr : Boolean [; const msg: string]); $[System
功能 測(cè)試布爾表達(dá)式是否成功
說(shuō)明 $ASSERTIONS ON/OFF | (long form)
$C +/- | (short form)首部 function Assigned(var P): Boolean; $[System
功能 返回變體是否非空。
說(shuō)明 ## if Assigned(Edit1) then Edit1.Free;
首部 procedure AssignFile(var F; FileName: string); $[System
功能 給文件變量賦一外部文件名。
說(shuō)明 用 F 文件變量打開(kāi) FileName 名字的文件
首部 procedure AssignPrn(var F: Text); $[Printers
功能 指定文本變量F的打印機(jī)
說(shuō)明
首部 procedure AssignStr(var P: PString; const S: string); $[SysUtils
功能 將字符串列入指針
說(shuō)明 PString 是 AnsiString 指針
首部 procedure AssociateAttr(const AttrID: TAttrID; const FieldID: TFieldID); $[DRIntf
功能 將ID屬性和事件關(guān)聯(lián)
說(shuō)明 type
TID = record Reseved: array[1..6] of Byte; end;
TFieldID = type TID;
TAttrID = type TID;
首部 procedure Beep; $[SysUtils
功能 產(chǎn)生一個(gè)標(biāo)準(zhǔn)的電腦發(fā)聲beep。
說(shuō)明 這個(gè)Beep過(guò)程使用了Windows下的API函數(shù)MessageBeep。
首部 function BeginThread(SecurityAttributes: Pointer; StackSize: LongWord; ThreadFunc: TThreadFunc; Parameter: Pointer; CreationFlags: LongWord; var ThreadId: LongWord): Integer; $[SysUtils
功能 以適當(dāng)?shù)姆绞浇⒂糜趦?nèi)存管理的線程。
說(shuō)明
首部 procedure BindStub(RepositoryID, InstanceName, HostName: PChar; const Orb: IORB; RefCountServer: CorbaBoolean; out Stub: IStub); $[orbpas
功能 獲得界面CORBA服務(wù)器的對(duì)象作為IStub界面
說(shuō)明 [CORBA]:程序體系結(jié)構(gòu)
首部 procedure BlockRead(var F: File; var Buf:; Count: Integer [; var AmtTransferred: Integer]); $[System
功能 從無(wú)類型文件F中讀出Count個(gè)記錄賦予變量Buf。
說(shuō)明 可選參數(shù)AmtTransferred表示實(shí)際讀取的記錄個(gè)數(shù)。一般一個(gè)記錄系指包含128字節(jié)的塊，但可使用帶有可選參數(shù)的Reset來(lái)改變從128到不同字節(jié)塊大小。
首部 procedure BlockWrite(var F: File; var Buf:; Count: Integer [; var AmtTransferred: Integer]); $[System
功能 把從變量Buf第一個(gè)字節(jié)開(kāi)始的Count個(gè)記錄寫入無(wú)類型文件F中。
說(shuō)明 可選參數(shù)AmtTransferred表示實(shí)際讀取的記錄個(gè)數(shù)。一般一個(gè)記錄系指包含128字節(jié)的塊，但可使用帶有可選參數(shù)的Rewrite來(lái)改變從128到不同字節(jié)塊大小。
首部 function Bounds(ALeft, ATop, AWidth, AHeight: Integer): TRect; $[Classes
功能 返回指定坐標(biāo)和范圍的TRect數(shù)據(jù)
說(shuō)明 type
TPoint = record
X: Longint;
Y: Longint;
end;
TRect = record
case Integer of
0: (Left, Top, Right, Bottom: Integer);
1: (TopLeft, BottomRight: TPoint);
end;
首部 procedure Break; $[System
功能 提前中止循環(huán)。
說(shuō)明 用于for、while、repeat-until中。
首部 function ByteToCharIndex(const S: string; Index: Integer): Integer; $[SysUtils
功能 返回索引Index的真實(shí)值
說(shuō)明 如果Index小于和大于S的長(zhǎng)度則返回0 ## ByteToCharIndex(‘12345678’, 9) = 0;
首部 function ByteToCharLen(const S: string; MaxLen: Integer): Integer; $[SysUtils
功能 返回字符的編號(hào)
說(shuō)明 如果Index小于S的長(zhǎng)度則返回0; 如果Index大于S的長(zhǎng)度則返回MaxLen; ##ByteToCharLen(‘12345678’,9) = 9;
首部 function ByteType(const S: string; Index: Integer): TMbcsByteType; $[SysUtils
功能 返回字符串指定位置的字節(jié)類型
說(shuō)明 type TMbcsByteType = (mbSingleByte, mbLeadByte, mbTrailByte); ## ByteType(‘國(guó)慶節(jié)12’,1) = mbLeadByte;
首部 procedure CancelDrag; $[Controls
功能 在程序運(yùn)行中取消拖放操作
說(shuō)明
首部 function Ceil(X: Extended):Integer; $[Math
功能 返回參數(shù)X的正取整值
說(shuō)明 ##Ceil(-2.8) = -2; Ceil(2.8) = 3; Ceil(-1.0) = -1;
首部 function ChangeFileExt(const FileName, Extension: string): string; $[SysUtils
功能 改變文件的后綴返回。
說(shuō)明 ##ChangeFileExt(‘zs.txt’,’.ini’) = ‘zs.ini’;
首部 function CharsetToIdent(Charset: Longint; var Ident: string): Boolean; $[Graphics
功能 獲得字符集的名稱
說(shuō)明 如果獲得成功則返回True,否則返回False
首部 function CharToByteIndex(const S: string; Index: Integer): Integer; $[SysUtils
功能 返回字符串基于索引Index的真實(shí)位置
說(shuō)明 如果Index小于和大于S的長(zhǎng)度則返回0
首部 function CharToByteLen(const S: string; MaxLen: Integer): Integer; $[SysUtils
功能 返回字符串基于索引Index的編號(hào)
說(shuō)明 如果Index小于S的長(zhǎng)度則返回0; 如果Index大于S的長(zhǎng)度則返回MaxLen;
首部 procedure ChDir(Path:); $[System
功能 改變當(dāng)前目錄
說(shuō)明 檢查IOResult可確定此改變是否成功。IOResult的值非零時(shí)表示Path不存在。
首部 procedure Check(Status: Integer); $[DBTables
功能 以變量來(lái)確定BDE抗議錯(cuò)誤狀態(tài)
說(shuō)明 [BDE(Borland Database Engine)]: 寶蘭德數(shù)據(jù)庫(kù)引擎
首部 function Chr(N: Byte): Char; $[System
功能 返回參數(shù)N的ASCII字符值。
說(shuō)明 參數(shù)N表示某ASCII代碼的序號(hào)數(shù)值(0-255)。
首部 function ClassIDToProgID(const ClassID: TGUID): string; $[ComObj
功能 返回標(biāo)題音樂(lè)的ID所指定類字串
說(shuō)明 type
PGUID = ^TGUID;
TGUID = record
D1: Longword;
D2: Word;
D3: Word;
D4: array[0..7] of Byte;
end;
錯(cuò)誤代碼 含義
REGDB_E_CLASSNOTREG | Class not regi
頁(yè)數(shù)：42 字?jǐn)?shù)：21585
[標(biāo)準(zhǔn)函數(shù)和過(guò)程]
首部 procedure Abort;$[SysUtils
功能 引起放棄的意外處理。
說(shuō)明 不顯示任何錯(cuò)誤信息。
首部 function Abs(N:
功能 返回參數(shù)N的絕對(duì)值。
說(shuō)明 函數(shù)結(jié)果與參數(shù)有相同類型，參數(shù)可以是整型也可以是浮點(diǎn)型。
## Abs(-12) = 12；Abs(-12.03) = 12.03
首部 procedure AddExitProc(Proc: TProcedure);$[SysUtils
功能 將舊版本某一過(guò)程添加到當(dāng)前版本運(yùn)行的庫(kù)的結(jié)束過(guò)程表中。
說(shuō)明 只能向下兼容，不能用在當(dāng)前使用版本的
首部 function Addr(X): Pointer;$[System
功能 返回指定對(duì)象的內(nèi)存地址。
說(shuō)明 地址運(yùn)算符 @ 可以產(chǎn)生與Addr相同的結(jié)果。
首部 procedure AddTerminateProc(TermProc: TTerminateProc);$[SysUtils
功能 將一過(guò)程添加到運(yùn)行時(shí)庫(kù)的終止過(guò)程表中。
說(shuō)明 Delphi 在程序結(jié)束時(shí)將終止該程序的全部進(jìn)程，可以終止的進(jìn)程都放在終止過(guò)程表中，
程序通過(guò)結(jié)束終止過(guò)程表所有的進(jìn)程來(lái)實(shí)現(xiàn)終止全部進(jìn)程的目的。
首部 function AdjustLineBreaks(const S: string): string;$[SysUtils
功能 將給定字符串的行分隔符調(diào)整為Cr/Lf序列。
說(shuō)明
首部 function AllocMem(Size: Cardinal): Pointer;$[SysUtils
功能 在堆棧上分配給定大小為 Size字節(jié)的塊，即在內(nèi)存里開(kāi)辟Size 大小的空間。
說(shuō)明 Cardinal 0..4294967295 32位無(wú)符號(hào)整數(shù)
首部 function AnsiCompareFileName(const S1, S2: string): Integer;$[SysUtils
功能 比較兩個(gè)文件名的大小。不區(qū)分大小寫。
說(shuō)明 條件 返回值
S1 > S2 | > 0
S1 < S2 | < 0
S1 = S2 | = 0
首部 function AnsiCompareStr(const S1, S2: string): Integer;$[SysUtils
功能 比較兩個(gè)字符串的大小。要區(qū)分大小寫。
說(shuō)明 參見(jiàn)AnsiCompareFileName。
首部 function AnsiCompareText(const S1, S2: string): Integer;$[SysUtils
功能 返回兩個(gè)字符串是否相同的狀態(tài)。不區(qū)分大小寫。
說(shuō)明 參見(jiàn)AnsiCompareFileName。
首部 function AnsiExtractQuotedStr(var Src: PChar; Quote: Char):string;$[SysUtils
功能 將引用字串轉(zhuǎn)換成結(jié)束引語(yǔ)返回。
說(shuō)明 函數(shù)支持多字節(jié)字符系統(tǒng)[MBCS]。
首部 function AnsiLastChar(const S: string): PChar;$[SysUtils
功能 取參數(shù)S的最后一個(gè)字符，并轉(zhuǎn)換成以null結(jié)束的字符串指針?lè)祷亍?br>說(shuō)明 ##AnsiLastChar(‘Sysoft’) = {‘t0’};
首部 function AnsiLowerCase(const S: string): string;$[SysUtils
功能 將字符串S轉(zhuǎn)換為小寫返回。
說(shuō)明 函數(shù)支持多字節(jié)字符系統(tǒng)[MBCS]。
首部 function AnsiLowerCaseFileName(const S: string): string;$[SysUtils
功能 將文件名S轉(zhuǎn)換成小寫返回
說(shuō)明 函數(shù)支持多字節(jié)字符系統(tǒng)[MBCS]。
首部 function AnsiPos(const Substr, S: string): Integer; $[SysUtils
功能 返回子串Substr出現(xiàn)在主串S中的第一個(gè)位置。
說(shuō)明
首部 function AnsiQuotedStr(const S: string; Quote: Char): string; $[SysUtils
功能 返回引用字串的譯文
說(shuō)明
首部 function AnsiStrComp(S1, S2: PChar): Integer; $[SysUtils
功能 比較兩個(gè)指針字符串的大小。要區(qū)分大小寫。
說(shuō)明 參見(jiàn)AnsiCompareFileName。
首部 function AnsiStrIComp(S1, S2: PChar): Integer; $[SysUtils
功能 比較兩個(gè)指針字符串的大小。不區(qū)分大小寫。
說(shuō)明 參見(jiàn)AnsiCompareFileName。
首部 function AnsiStrLastChar(P: PChar): PChar; $[SysUtils
功能 返回字符串指針氣所指向的最后一個(gè)字符位置
說(shuō)明
首部 function AnsiStrLComp(S1, S2: PChar; MaxLen: Cardinal): Integer; $[SysUtils
功能 在最大長(zhǎng)度MaxLen的范圍內(nèi)比較兩個(gè)指針字符串的大小。要區(qū)分大小寫。
說(shuō)明 參見(jiàn)AnsiCompareFileName。
首部 function AnsiStrLIComp(S1, S2: PChar; MaxLen: Cardinal): Integer; $[SysUnits
功能 在最大長(zhǎng)度MaxLen的范圍內(nèi)比較兩個(gè)指針字符串的大小。不區(qū)分大小寫。
說(shuō)明 參見(jiàn)AnsiCompareFileName。
首部 function AnsiStrLower(Str: PChar): PChar; $[SysUtils
功能 將指針字符串S轉(zhuǎn)換為小寫返回。
說(shuō)明
首部 function AnsiStrPos(Str, SubStr: PChar): PChar; $[SysUtils
功能 在指針字符串中返回子串Substr出現(xiàn)在主串S中的第一個(gè)位置。
說(shuō)明
首部 function AnsiStrRScan(Str: PChar; Chr: Char): PChar; $[SysUtils
功能 返回以字符Chr在指針字符串Str中的最后一個(gè)位置為起始位置的指針字符串
說(shuō)明 ## AnsiStrRScan(‘Zswangs1234567’, ‘s’) = ‘s1234567’;
首部 function AnsiStrScan(Str: PChar; Chr: Char): PChar; $[SysUtils
功能 返回以字符Chr在指針字符串Str中的第一個(gè)位置為起始位置的指針字符串
說(shuō)明 ## AnsiStrScan(‘Zswangs1234567’, ‘s’) = ‘swangs1234567’;
首部 function AnsiStrUpper(Str: PChar): PChar; $[SysUtils
功能 將指針字符串S轉(zhuǎn)換成大寫返回。
說(shuō)明
首部 function AnsiToNative(Locale: TLocale; const AnsiStr: string; NativeStr: PChar; MaxLen: Integer): PChar; $[SysUtils
功能 將字符串集轉(zhuǎn)換成現(xiàn)場(chǎng)數(shù)據(jù)返回
說(shuō)明 type TLocale = Pointer;
首部 procedure AnsiToNativeBuf(Locale: TLocale; Source, Dest: PChar; Len: Integer); $[SysUtils
功能 將字符串集轉(zhuǎn)換成現(xiàn)場(chǎng)數(shù)據(jù)
說(shuō)明
首部 function AnsiUpperCase(const S: string): string; $[SysUtils
功能 將字符轉(zhuǎn)換為大寫返回。
說(shuō)明
首部 function AnsiUpperCaseFileName(const S: string): string; $[SysUtils
功能 將文件名轉(zhuǎn)換為大寫返回。
說(shuō)明
首部 procedure Append(var F: Text); $[System
功能 以附加的方式打開(kāi)已有的文件。
說(shuō)明 調(diào)用Append前，F(xiàn)必須已與一個(gè)外部文件相聯(lián)系。對(duì)用Append打開(kāi)的文件，僅有合法操作是調(diào)用Write或Writeln。
首部 procedure AppendStr(var Dest: string; const S: string); $[SysUtils
功能 將字串S添加到字串Dest中。[即運(yùn)行: Dest := Dest + s;]
說(shuō)明 ## AppendStr(‘Sysoft’, ‘1999’) = ‘Sysoft1999’;
首部 function ArcCos(X: Extended): Extended; $[Math
功能 返回X參數(shù)的反余弦值。
說(shuō)明 函數(shù)結(jié)果取弧度值。
首部 function ArcCosh(X: Extended): Extended; $[Math
功能 返回X參數(shù)的反雙曲余弦值。
說(shuō)明 函數(shù)結(jié)果取弧度值。
首部 function ArcSin(X: Extended): Extended; $[Math
功能 返回X參數(shù)的反正弦值。
說(shuō)明 函數(shù)結(jié)果取弧度值。
首部 function ArcSinh(X: Extended): Extended; $[Math
功能 返回X參數(shù)的反雙曲正弦值。
說(shuō)明 函數(shù)結(jié)果取弧度值。
首部 function ArcTan(X: Extended): Extended; $[System
功能 返回參數(shù)X的反正切函數(shù)值。
說(shuō)明 函數(shù)結(jié)果取弧度值。
首部 function ArcTan2(Y, X: Extended): Extended; $[Math
功能 返回參數(shù)Y除于X參數(shù)的反正切函數(shù)值。{即：返回ArcTan(Y/X)}
說(shuō)明 函數(shù)結(jié)果取弧度值。
首部 function ArcTanh(X: Extended): Extended; $[Math
功能 返回參數(shù)X的反雙曲正切函數(shù)值。
說(shuō)明 函數(shù)結(jié)果取弧度值。
首部 procedure Assert(expr : Boolean [; const msg: string]); $[System
功能 測(cè)試布爾表達(dá)式是否成功
說(shuō)明 $ASSERTIONS ON/OFF | (long form)
$C +/- | (short form)首部 function Assigned(var P): Boolean; $[System
功能 返回變體是否非空。
說(shuō)明 ## if Assigned(Edit1) then Edit1.Free;
首部 procedure AssignFile(var F; FileName: string); $[System
功能 給文件變量賦一外部文件名。
說(shuō)明 用 F 文件變量打開(kāi) FileName 名字的文件
首部 procedure AssignPrn(var F: Text); $[Printers
功能 指定文本變量F的打印機(jī)
說(shuō)明
首部 procedure AssignStr(var P: PString; const S: string); $[SysUtils
功能 將字符串列入指針
說(shuō)明 PString 是 AnsiString 指針
首部 procedure AssociateAttr(const AttrID: TAttrID; const FieldID: TFieldID); $[DRIntf
功能 將ID屬性和事件關(guān)聯(lián)
說(shuō)明 type
TID = record Reseved: array[1..6] of Byte; end;
TFieldID = type TID;
TAttrID = type TID;
首部 procedure Beep; $[SysUtils
功能 產(chǎn)生一個(gè)標(biāo)準(zhǔn)的電腦發(fā)聲beep。
說(shuō)明 這個(gè)Beep過(guò)程使用了Windows下的API函數(shù)MessageBeep。
首部 function BeginThread(SecurityAttributes: Pointer; StackSize: LongWord; ThreadFunc: TThreadFunc; Parameter: Pointer; CreationFlags: LongWord; var ThreadId: LongWord): Integer; $[SysUtils
功能 以適當(dāng)?shù)姆绞浇⒂糜趦?nèi)存管理的線程。
說(shuō)明
首部 procedure BindStub(RepositoryID, InstanceName, HostName: PChar; const Orb: IORB; RefCountServer: CorbaBoolean; out Stub: IStub); $[orbpas
功能 獲得界面CORBA服務(wù)器的對(duì)象作為IStub界面
說(shuō)明 [CORBA]:程序體系結(jié)構(gòu)
首部 procedure BlockRead(var F: File; var Buf:
功能 從無(wú)類型文件F中讀出Count個(gè)記錄賦予變量Buf。
說(shuō)明 可選參數(shù)AmtTransferred表示實(shí)際讀取的記錄個(gè)數(shù)。一般一個(gè)記錄系指包含128字節(jié)的塊，但可使用帶有可選參數(shù)的Reset來(lái)改變從128到不同字節(jié)塊大小。
首部 procedure BlockWrite(var F: File; var Buf:
功能 把從變量Buf第一個(gè)字節(jié)開(kāi)始的Count個(gè)記錄寫入無(wú)類型文件F中。
說(shuō)明 可選參數(shù)AmtTransferred表示實(shí)際讀取的記錄個(gè)數(shù)。一般一個(gè)記錄系指包含128字節(jié)的塊，但可使用帶有可選參數(shù)的Rewrite來(lái)改變從128到不同字節(jié)塊大小。
首部 function Bounds(ALeft, ATop, AWidth, AHeight: Integer): TRect; $[Classes
功能 返回指定坐標(biāo)和范圍的TRect數(shù)據(jù)
說(shuō)明 type
TPoint = record
X: Longint;
Y: Longint;
end;
TRect = record
case Integer of
0: (Left, Top, Right, Bottom: Integer);
1: (TopLeft, BottomRight: TPoint);
end;
首部 procedure Break; $[System
功能 提前中止循環(huán)。
說(shuō)明 用于for、while、repeat-until中。
首部 function ByteToCharIndex(const S: string; Index: Integer): Integer; $[SysUtils
功能 返回索引Index的真實(shí)值
說(shuō)明 如果Index小于和大于S的長(zhǎng)度則返回0 ## ByteToCharIndex(‘12345678’, 9) = 0;
首部 function ByteToCharLen(const S: string; MaxLen: Integer): Integer; $[SysUtils
功能 返回字符的編號(hào)
說(shuō)明 如果Index小于S的長(zhǎng)度則返回0; 如果Index大于S的長(zhǎng)度則返回MaxLen; ##ByteToCharLen(‘12345678’,9) = 9;
首部 function ByteType(const S: string; Index: Integer): TMbcsByteType; $[SysUtils
功能 返回字符串指定位置的字節(jié)類型
說(shuō)明 type TMbcsByteType = (mbSingleByte, mbLeadByte, mbTrailByte); ## ByteType(‘國(guó)慶節(jié)12’,1) = mbLeadByte;
首部 procedure CancelDrag; $[Controls
功能 在程序運(yùn)行中取消拖放操作
說(shuō)明
首部 function Ceil(X: Extended):Integer; $[Math
功能 返回參數(shù)X的正取整值
說(shuō)明 ##Ceil(-2.8) = -2; Ceil(2.8) = 3; Ceil(-1.0) = -1;
首部 function ChangeFileExt(const FileName, Extension: string): string; $[SysUtils
功能 改變文件的后綴返回。
說(shuō)明 ##ChangeFileExt(‘zs.txt’,’.ini’) = ‘zs.ini’;
首部 function CharsetToIdent(Charset: Longint; var Ident: string): Boolean; $[Graphics
功能 獲得字符集的名稱
說(shuō)明 如果獲得成功則返回True,否則返回False
首部 function CharToByteIndex(const S: string; Index: Integer): Integer; $[SysUtils
功能 返回字符串基于索引Index的真實(shí)位置
說(shuō)明 如果Index小于和大于S的長(zhǎng)度則返回0
首部 function CharToByteLen(const S: string; MaxLen: Integer): Integer; $[SysUtils
功能 返回字符串基于索引Index的編號(hào)
說(shuō)明 如果Index小于S的長(zhǎng)度則返回0; 如果Index大于S的長(zhǎng)度則返回MaxLen;
首部 procedure ChDir(Path:
功能 改變當(dāng)前目錄
說(shuō)明 檢查IOResult可確定此改變是否成功。IOResult的值非零時(shí)表示Path不存在。
首部 procedure Check(Status: Integer); $[DBTables
功能 以變量來(lái)確定BDE抗議錯(cuò)誤狀態(tài)
說(shuō)明 [BDE(Borland Database Engine)]: 寶蘭德數(shù)據(jù)庫(kù)引擎
首部 function Chr(N: Byte): Char; $[System
功能 返回參數(shù)N的ASCII字符值。
說(shuō)明 參數(shù)N表示某ASCII代碼的序號(hào)數(shù)值(0-255)。
首部 function ClassIDToProgID(const ClassID: TGUID): string; $[ComObj
功能 返回標(biāo)題音樂(lè)的ID所指定類字串
說(shuō)明 type
PGUID = ^TGUID;
TGUID = record
D1: Longword;
D2: Word;
D3: Word;
D4: array[0..7] of Byte;
end;
錯(cuò)誤代碼 含義
REGDB_E_CLASSNOTREG | Class not regi
TA們正在看...
- 應(yīng)屆畢業(yè)生社會(huì)實(shí)踐自我鑒定.doc
- 林業(yè)方面的個(gè)人工作總結(jié).doc
- 應(yīng)屆畢業(yè)生社會(huì)實(shí)踐自我鑒定范文.doc
- 林業(yè)檢查總站工作的自我總結(jié).doc
- 應(yīng)屆畢業(yè)生自我鑒定.doc
- 林業(yè)站個(gè)人工作總結(jié).doc
- 應(yīng)屆畢業(yè)生自我鑒定范本.doc
- 林業(yè)站工作的自我總結(jié).doc
- 應(yīng)屆畢業(yè)生轉(zhuǎn)正定級(jí)自我鑒定模板經(jīng)典.doc
- 林業(yè)站工作自我總結(jié).doc
