求Delphi5函数手册(或下载地址)，有较详细使用说明的！ 给10~160 p报酬

Question

我正在写Delphi6.0的，还没有写完<<Delphi6函数大全-SysUtils.pas>>
首部  function Languages: TLanguages; $[SysUtils.pas
功能  返回系统语言对象
说明  通过此函数可以得到系统的语言环境
参考  type SysUtils.TLanguages
例子  
///////Begin Languages
procedure TForm1.Button1Click(Sender: TObject);
var
  I: Integer;
begin
  Memo1.Clear;
  for I := 0 to Languages.Count - 1 do
    Memo1.Lines.Add(Languages.Name[I]);
end;
///////End Languages
&_  
首部  function AllocMem(Size: Cardinal): Pointer; $[SysUtils.pas
功能  返回一个指定大小Size的内存块
说明  配合用FreeMem释放资源
参考  function System.GetMem
例子  
///////Begin AllocMem
procedure TForm1.Button1Click(Sender: TObject);
var
  I: PInteger;
begin
  I := AllocMem(SizeOf(Integer));
  I^ := 100;
  Edit1.Text := IntToStr(I^);
  FreeMem(I, SizeOf(Integer));
end;
///////End AllocMem
&_  
首部  procedure AddExitProc(Proc: TProcedure); $[SysUtils.pas
功能  添加一个退出处理的过程
说明  建议用finalization部分取代
参考  <NULL>
例子  
////////Begin AddExitProc
uses
  ShellApi;procedure ExitProc;
begin
  ShellExecute(0, 'Open', 'Calc.exe', nil, nil, SW_SHOW);
end;procedure TForm1.Button1Click(Sender: TObject);
begin
  AddExitProc(ExitProc);
end;
////////End AddExitProc
────────────────────────
首部  function NewStr(const S: string): PString; deprecated; $[SysUtils.pas
功能  返回一个新的字符串指针地址
说明  字符串S为空时返回NullStr
参考  procedure System.New
例子  
////////Begin NewStr,DisposeStr
procedure TForm1.Button1Click(Sender: TObject);
var
  P: PString;
begin
  P := NewStr(Edit1.Text);
  Edit2.Text := P^;
  DisposeStr(P);
end;
////////End NewStr,DisposeStr
────────────────────────  
首部  procedure DisposeStr(P: PString); deprecated; $[SysUtils.pas
功能  释放字符串指针P资源
说明  配合函数NewStr使用
参考  procedure System.Dispose
例子  <如上参见,如下参见>
────────────────────────  
首部  procedure AssignStr(var P: PString; const S: string); deprecated; $[SysUtils.pas
功能  将字符串S更新给字符串指针P
说明  更新值时会释放以前字符串指针的资源
参考  function SysUtils.NewStr;function SysUtils.DisposeStr
例子  
////////Begin AssignStr
procedure TForm1.Button1Click(Sender: TObject);
var
  P: PString;
begin
  P := nil;
  AssignStr(P, Edit1.Text);
  Edit2.Text := P^;
  DisposeStr(P);
end;
////////End AssignStr
────────────────────────  
首部  procedure AppendStr(var Dest: string; const S: string); deprecated; $[SysUtils.pas
功能  在字符串Dest后追加字符串S
说明  相当于Dest := Dest + S;Delphi6已经不建议使用
参考  <NULL>
例子  
////////Begin AppendStr
procedure TForm1.Button1Click(Sender: TObject);
var
  S: string;
begin
  S := Edit2.Text;
  AppendStr(S, Edit1.Text);
  Edit2.Text := S;
end;
////////End AppendStr
────────────────────────  
首部  function UpperCase(const S: string): string; $[SysUtils.pas
功能  返回字符串S的大写形式
说明  非小写字符不处理
参考  procedure System.SetLength
例子  Edit2.Text := UpperCase(Edit1.Text);
────────────────────────  
首部  function LowerCase(const S: string): string; $[SysUtils.pas
功能  返回字符串S的小写形式
说明  非大写字符不处理
参考  procedure System.SetLength
例子  Edit2.Text := LowerCase(Edit1.Text);
────────────────────────  
首部  function CompareStr(const S1, S2: string): Integer; $[SysUtils.pas
功能  返回比较两个字符
说明  当S1>S2返回值>0;当S1<S2返回值<0;当S1=S2返回值=0;区分大小写
参考  <NULL>
例子  SpinEdit1.Value := CompareStr(Edit1.Text, Edit2.Text);
────────────────────────  
首部  function CompareMem(P1, P2: Pointer; Length: Integer): Boolean; assembler; $[SysUtils.pas
功能  返回比较两个内存指针
说明  CompareMem(PChar('12a'), PChar('12c'), 2)=True;CompareMem(PChar('12a'), PChar('12c'), 3)=False
参考  <NULL>
例子  CheckBox1.Checked := CompareMem(Self, Form1, 8);
────────────────────────  
首部  function CompareText(const S1, S2: string): Integer; $[SysUtils.pas
功能  返回比较两个字符串
说明  不区分大小写
参考  <NULL>
例子  SpinEdit1.Value := CompareText(Edit1.Text, Edit2.Text);
────────────────────────  
首部  function SameText(const S1, S2: string): Boolean; $[SysUtils.pas
功能  返回两个字符串是否相等
说明  不区分大小写
参考  <NULL>
例子  CheckBox1.Checked := SameText(Edit1.Text, Edit2.Text);
────────────────────────  
首部  function AnsiUpperCase(const S: string): string; $[SysUtils.pas
功能  返回字符串S的大写形式
说明  ANSI(American National Standards Institute)美国国家标准协会;非小写的字符不变
参考  function Windows.CharUpperBuff
例子  Edit2.Text := AnsiUpperCase(Edit1.Text);
────────────────────────
首部  function AnsiLowerCase(const S: string): string; $[SysUtils.pas
功能  返回字符串S的小写形式
说明  非大写字符不处理
参考  function Windows.CharLowerBuff
例子  Edit2.Text := AnsiLowerCase(Edit1.Text);
────────────────────────
首部  function AnsiCompareStr(const S1, S2: string): Integer; $[SysUtils.pas
功能  反回比较两个字符串
说明  当S1>S2返回值>0;当S1<S2返回值<0;当S1=S2返回值=0;区分大小写
参考  function Windows.CompareString
例子  SpinEdit1.Value := AnsiCompareStr(Edit1.Text, Edit2.Text);
────────────────────────
首部  function AnsiSameStr(const S1, S2: string): Boolean; $[SysUtils.pas
功能  返回两个字符串是否相等
说明  区分大小写
参考  function SysUtils.AnsiCompareStr
例子  CheckBox1.Checked := AnsiSameStr(Edit1.Text, Edit2.Text);
────────────────────────
首部  function AnsiCompareText(const S1, S2: string): Integer; $[SysUtils.pas
功能  反回比较两个字符串
说明  当S1>S2返回值>0;当S1<S2返回值<0;当S1=S2返回值=0;不区分大小写
参考  function Windows.CompareString
例子  SpinEdit1.Value := AnsiCompareText(Edit1.Text, Edit2.Text);
────────────────────────
首部  function AnsiSameText(const S1, S2: string): Boolean; $[SysUtils.pas
功能  返回两个字符串是否相等
说明  不区分大小写
参考  function SysUtils.AnsiCompareText
例子  CheckBox1.Checked := AnsiSameText(Edit1.Text, Edit2.Text);
────────────────────────
首部  function AnsiStrComp(S1, S2: PChar): Integer; $[SysUtils.pas
功能  返回比较两个指针字符串
说明  当S1>S2返回值>0;当S1<S2返回值<0;当S1=S2返回值=0;区分大小写
参考  function System.CompareString
例子  SpinEdit1.Value := AnsiStrComp(PChar(Edit1.Text), PChar(Edit2.Text))
────────────────────────
首部  function AnsiStrIComp(S1, S2: PChar): Integer; $[SysUtils.pas
功能  返回比较两个指针字符串
说明  当S1>S2返回值>0;当S1<S2返回值<0;当S1=S2返回值=0;不区分大小写;采用系统效验;Ignore(忽略)
参考  function Windows.CompareString
例子  SpinEdit1.Value := AnsiStrIComp(PChar(Edit1.Text), PChar(Edit2.Text))
────────────────────────
首部  function AnsiStrLComp(S1, S2: PChar; MaxLen: Cardinal): Integer; $[SysUtils.pas
功能  返回比较两个指针字符串指定长度
说明  当S1>S2返回值>0;当S1<S2返回值<0;当S1=S2返回值=0;区分大小写;采用现场效验;Locale(现场)
参考  function Windows.CompareString
例子  SpinEdit1.Value := AnsiStrLComp(PChar(Edit1.Text), PChar(Edit2.Text), SpinEdit2.Value)
────────────────────────
首部  function AnsiStrLIComp(S1, S2: PChar; MaxLen: Cardinal): Integer; $[SysUtils.pas
功能  返回比较两个指针字符串指定长度
说明  当S1>S2返回值>0;当S1<S2返回值<0;当S1=S2返回值=0;不区分大小写;采用现场效验
参考  function Windows.CompareString
例子  SpinEdit1.Value := AnsiStrLIComp(PChar(Edit1.Text), PChar(Edit2.Text), SpinEdit2.Value)
────────────────────────
首部  function AnsiStrLower(Str: PChar): PChar; $[SysUtils.pas
功能  返回指针字符串小写形式
说明  非大写字符不处理
参考  function Windows.CharLower
例子  Edit2.Text := AnsiStrLower(PChar(Edit1.Text));
────────────────────────
首部  function AnsiStrUpper(Str: PChar): PChar; $[SysUtils.pas
功能  返回指针字符串大写形式
说明  非小写字符不处理
参考  function Windows.CharUpper
例子  Edit2.Text := AnsiStrUpper(PChar(Edit1.Text));
────────────────────────
首部  function AnsiLastChar(const S: string): PChar; $[SysUtils.pas
功能  返回字符串S的最后一个指针字符
说明  当字符串S为空串则返回空指针
参考  function SysUtils.ByteType
例子  Edit2.Text := AnsiLastChar(Edit1.Text);
────────────────────────
首部  function AnsiStrLastChar(P: PChar): PChar; $[SysUtils.pas
功能  返回指针字符串P的最后一个指针字符
说明  当字符串P为空空指针则返回空指针
参考  function SysUtils.ByteType
例子  Edit2.Text := AnsiLastChar(PChar(Edit1.Text));
────────────────────────  
首部  function WideUpperCase(const S: WideString): WideString; $[SysUtils.pas
功能  返回双字节字符串的大写形式
说明  WideChar双字节字符
参考  function Windows.CharUpperBuffW
例子  Edit2.Text := WideUpperCase(Edit1.Text);
────────────────────────
首部  function WideLowerCase(const S: WideString): WideString; $[SysUtils.pas
功能  返回双字节字符串的小写形式
说明  我怎么就测试不出来呢
参考  function Windows.CharLowerBuffW
例子  Edit2.Text := WideLowerCase(Edit1.Text);
────────────────────────
首部  function WideCompareStr(const S1, S2: WideString): Integer; $[SysUtils.pas
功能  返回比较两个双字节字符串
说明  当S1>S2返回值>0;当S1<S2返回值<0;当S1=S2返回值=0;区分大小写
参考  function Windows.CompareStringW
例子  SpinEdit1.Value := WideCompareStr(Edit1.Text, Edit2.Text);
────────────────────────  
首部  function WideSameStr(const S1, S2: WideString): Boolean; $[SysUtils.pas
功能  返回两个双字节字符串是否相同
说明  区分大小写
参考  funciton SysUtils.WideCompareStr
例子  CheckBox1.Checked := WideSameStr(Edit1.Text, Edit2.Text);
────────────────────────
首部  function WideCompareText(const S1, S2: WideString): Integer; $[SysUtils.pas
功能  返回比较两个双字节字符串
说明  当S1>S2返回值>0;当S1<S2返回值<0;当S1=S2返回值=0;不区分大小写
参考  function Windows.CompareStringW
例子  SpinEdit1.Value := WideCompareText(Edit1.Text, Edit2.Text);
────────────────────────
首部  function WideSameText(const S1, S2: WideString): Boolean; $[SysUtils.pas
功能  返回两个双字节字符串是否相同
说明  不区分大小写
参考  funciton SysUtils.WideCompareText
例子  CheckBox1.Checked := WideSameText(Edit1.Text, Edit2.Text);
────────────────────────  
首部  function Trim(const S: string): string; overload; $[SysUtils.pas
首部  function Trim(const S: WideString): WideString; overload; $[SysUtils.pas
功能  返回除去字符串S左右不可见字符
说明  小于#32的字符看作不可见字符
参考  function System.Copy
例子  Edit2.Text := Trim(Edit1.Text);
────────────────────────
首部  function TrimLeft(const S: string): string; overload; $[SysUtils.pas
首部  function TrimLeft(const S: WideString): WideString; overload; $[SysUtils.pas
功能  返回除去字符串S左边不可见字符
说明  小于#32的字符看作不可见字符
参考  function System.Copy
例子  Edit2.Text := TrimLeft(Edit1.Text);
────────────────────────
首部  function TrimRight(const S: string): string; overload; $[SysUtils.pas
首部  function TrimRight(const S: WideString): WideString; overload; $[SysUtils.pas
功能  返回除去字符串S右边不可见字符
说明  小于#32的字符看作不可见字符
参考  function System.Copy
例子  Edit2.Text := TrimRight(Edit1.Text);
────────────────────────
首部  function QuotedStr(const S: string): string; $[SysUtils.pas
功能  返回字符串S在pascal中的表现形式
说明  单引号中的一个单引号将转成两个
参考  procedure System.Insert
例子  Edit2.Text := QuotedStr(Edit1.Text);
────────────────────────
首部  function AnsiQuotedStr(const S: string; Quote: Char): string; $[SysUtils.pas
功能  返回字符串S以字符Quote为引号的表现形式
说明  AnsiQuotedStr('hello"world', '@')='@hello"world@';AnsiQuotedStr('hello"world', '"')='"hello""world"'
参考  function SysUtils.AnsiStrScan
例子  Edit2.Text := AnsiQuotedStr(Edit1.Text, '"');
────────────────────────
首部  function AnsiExtractQuotedStr(var Src: PChar; Quote: Char): string; $[SysUtils.pas
功能  返回以字符Quote为引号的表现形式原形
说明  表现形式非法时Src不变否则为空
参考  function SysUtils.AnsiStrScan
例子
///////Begin AnsiExtractQuotedStr
procedure TForm1.Button1Click(Sender: TObject);
var
  P: PChar;
begin
  P := PChar(Edit1.Text);
  Edit2.Text := AnsiExtractQuotedStr(P, '"');
  Edit3.Text := P;
end;
///////End AnsiExtractQuotedStr
────────────────────────
首部  function AnsiDequotedStr(const S: string; AQuote: Char): string; $[SysUtils.pas
功能  返回以字符AQuote为引号的表现形式原形
说明  表现形式非法时则返回S
参考  function SysUtils.AnsiExtractQuotedStr
例子  Edit2.Text := AnsiDequotedStr(Edit1.Text, '"');
────────────────────────
首部  function AdjustLineBreaks(const S: string; Style: TTextLineBreakStyle = {$IFDEF LINUX} tlbsLF {$ENDIF} {$IFDEF MSWINDOWS} tlbsCRLF {$ENDIF}): string; $[SysUtils.pas
功能  返回将给定字符串的行分隔符调整为CR/LF序列
说明  AdjustLineBreaks('1'#13'2'#13)='1'#13#10'2'#13#10;AdjustLineBreaks('1'#10'2'#10)='1'#13#10'2'#13#10
参考  function SysUtils.StrNextChar
例子  <NULL>
────────────────────────
首部  function IsValidIdent(const Ident: string): Boolean; $[SysUtils.pas
功能  返回字符串Ident是否是正确的标识符
说明  标识符::字母|下划线[字母|下划线|数字]...
参考  <NULL>
例子  CheckBox1.Checked := IsValidIdent(Edit1.Text);
────────────────────────
首部  function IntToStr(Value: Integer): string; overload; $[SysUtils.pas
首部  function IntToStr(Value: Int64): string; overload; $[SysUtils.pas
功能  返回整数Value转换成字符串
说明  Format('%d', [Value])
参考  function SysUtils.FmtStr
例子  Edit2.Text := IntToStr(SpinEdit1.Value);
────────────────────────
首部  function IntToHex(Value: Integer; Digits: Integer): string; overload; $[SysUtils.pas
首部  function IntToHex(Value: Int64; Digits: Integer): string; overload; $[SysUtils.pas
功能  返回整数Value转换成十六进制表现结果;Format('%.*x', [Digits, Value])
说明  参数Digits指定字符最小宽度;最小宽度不足时将用0填充
参考  function SysUtils.FmtStr
例子  Edit2.Text := IntToHex(SpinEdit1.Value, SpinEdit2.Value);
────────────────────────
首部  function StrToInt(const S: string): Integer; $[SysUtils.pas
功能  返回字符串S转换成整数
说明  字符非数字表达时将引起异常
参考  procedure System.Val
例子  SpinEdit1.Value := StrToInt(Edit1.Text);
────────────────────────
首部  function StrToIntDef(const S: string; Default: Integer): Integer; $[SysUtils.pas
功能  返回字符串S转换成整数,如果出错则返回默认值Default
说明  字符非数字表达时则返回默认值Default
参考  procedure System.Val
例子  SpinEdit1.Value := StrToIntDef(Edit1.Text, 0);
────────────────────────
首部  function TryStrToInt(const S: string; out Value: Integer): Boolean; $[SysUtils.pas
功能  返回字符串S转换成整数Value是否成功
说明  字符非数字表达时返回False并且Value将输出为0
参考  procedure System.Val
例子
///////Begin TryStrToInt
procedure TForm1.Button1Click(Sender: TObject);
var
  I: Integer;
begin
  CheckBox1.Checked := TryStrToInt(Edit1.Text, I);
  SpinEdit1.Value := I;
end;
///////End TryStrToInt
────────────────────────
首部  function StrToInt64(const S: string): Int64; $[SysUtils.pas
功能  返回字符串S转换成六十四位整数
说明  字符非数字表达时将引起异常
参考  procedure System.Val
例子  SpinEdit1.Value := StrToInt64(Edit1.Text);
────────────────────────
首部  function StrToInt64Def(const S: string; const Default: Int64): Int64; $[SysUtils.pas
功能  返回字符串S转换成六十四位整数,如果出错则返回默认值Default
说明  字符非数字表达时则返回默认值Default
参考  procedure System.Val
例子  SpinEdit1.Value := StrToInt64Def(Edit1.Text, 0);
────────────────────────
首部  function TryStrToInt64(const S: string; out Value: Int64): Boolean; $[SysUtils.pas
功能  返回字符串S转换成六十四位整数Value是否成功
说明  字符非数字表达时返回False并且Value将输出为0
参考  procedure System.Val
例子
///////Begin TryStrToInt64
procedure TForm1.Button1Click(Sender: TObject);
var
  I: Int64;
begin
  CheckBox1.Checked := TryStrToInt64(Edit1.Text, I);
  SpinEdit1.Value := I;
end;
///////End TryStrToInt64
────────────────────────
首部  function StrToBool(const S: string): Boolean; $[SysUtils.pas
功能  返回字符串S转换成逻辑值
说明  字符非逻辑表达时将引起异常
参考  function SysUtils.TryStrToBool
例子  CheckBox1.Checked := StrToBool(Edit1.Text);
────────────────────────
首部  function StrToBoolDef(const S: string; const Default: Boolean): Boolean; $[SysUtils.pas
功能  返回字符串S转换成逻辑值,如果出错则返回默认值Default
说明  字符非逻辑表达时则返回默认值Default
参考  function SysUtils.TryStrToBool
例子  CheckBox1.Checked := StrToBoolDef(Edit1.Text, False);
────────────────────────
首部  function TryStrToBool(const S: string; out Value: Boolean): Boolean; $[SysUtils.pas
功能  返回字符串S转换成逻辑值Value是否成功
说明  [注意]0为假非0为真;不是'True'和'False';Delphi6 Bug 如下修正
参考  funciton SysUtils.AnsiSameText;var SysUtils.TrueBoolStrs;var SysUtils.FalseBoolStrs
例子
///////Begin TryStrToBool
procedure TForm1.Button1Click(Sender: TObject);
var
  B: Boolean;
begin
  SetLength(TrueBoolStrs, 2);
  SetLength(FalseBoolStrs, 2);
  TrueBoolStrs[0] := 'True';
  FalseBoolStrs[0] := 'False';
  TrueBoolStrs[1] := 'Yes';
  FalseBoolStrs[1] := 'No';
  CheckBox1.Checked := TryStrToBool(Edit1.Text, B);
  CheckBox2.Checked := B;
end;
///////End TryStrToBool
附加
///////Begin TryStrToBool
function TryStrToBool(const S: string; out Value: Boolean): Boolean;
  function CompareWith(const aArray: array of string): Boolean;
  var
    I: Integer;
  begin
    Result := False;
    for I := Low(aArray) to High(aArray) do
      if AnsiSameText(S, aArray[I]) then
      begin
        Result := True;
        Break;
      end;
  end;
var
  LResult: Extended;
begin
  Result := TryStrToFloat(S, LResult);
  if Result then
    Value := LResult <> 0
  else
  begin
    Result := True; //修正处
    VerifyBoolStrArray;
    if CompareWith(TrueBoolStrs) then
      Value := True
    else if CompareWith(FalseBoolStrs) then
      Value := False
    else
      Result := False;
  end;
end;
///////End TryStrToBool
────────────────────────
首部  function BoolToStr(B: Boolean; UseBoolStrs: Boolean = False): string; $[SysUtils.pas
功能  返回逻辑值B转换成字符串
说明  BoolToStr(False, False)='0';BoolToStr(False, True)='-1'
参考  var SysUtils.TrueBoolStrs;var SysUtils.FalseBoolStrs
例子  Edit1.Text := BoolToStr(CheckBox1.Checked, CheckBox2.Checked);
────────────────────────
首部  function LoadStr(Ident: Integer): string; $[SysUtils.pas
功能  返回根据标识Ident的字符串资源
说明  字符串资源是指程序的内部资源
参考  function SysUtils.FindStringResource
例子  Edit2.Text := LoadStr(StrToIntDef(Edit1.Text, 0));
────────────────────────
首部  function FmtLoadStr(Ident: Integer; const Args: array of const): string; $[SysUtils.pas
功能  返回格式化的字符串资源
说明  字符串资源是指程序的内部资源
参考  function SysUtils.FmtStr;function SysUtils.FindStringResource
例子  <NULL>;
────────────────────────
首部  function FileOpen(const FileName: string; Mode: LongWord): Integer; $[SysUtils.pas
功能  返回打开文件果
说明  Mode指定打开文件的模式(fmOpenRead,fmOpenWrite,fmOpenReadWrite....);打开失败则返回负数
参考  function Windows.CreateFile
例子
///////Begin FileOpen,FileClose
procedure TForm1.Button1Click(Sender: TObject);
var
  I: Integer;
begin
  I := FileOpen(Edit1.Text, fmOpenRead);
  CheckBox1.Checked := I > 0;
  FileClose(I);
end;
///////Begin FileOpen,FileClose
────────────────────────
首部  function FileCreate(const FileName: string): Integer; overload; $[SysUtils.pas
首部  function FileCreate(const FileName: string; Rights: Integer): Integer; overload; $[SysUtils.pas
功能  返回创建文件
说明  创建失败则返回负数
参考  function Windows.CreateFile
例子
///////Begin FileCreate
procedure TForm1.Button1Click(Sender: TObject);
var
  I: Integer;
begin
  I := FileCreate(Edit1.Text);
  CheckBox1.Checked := I > 0;
  FileClose(I);
end;
///////End FileCreate
────────────────────────
首部  function FileRead(Handle: Integer; var Buffer; Count: LongWord): Integer; $[SysUtils.pas
功能  返回读取文件缓冲区的大小
说明  读取失败则返回负数
参考  function Windows.ReadFile
例子  <参见FileOpen>
────────────────────────
首部  function FileWrite(Handle: Integer; const Buffer; Count: LongWord): Integer; $[SysUtils.pas
功能  返回写入文件缓冲区的大小
说明  写入失败则返回负数
参考  function Windows.WriteFile
例子  <参见FileCreate>
────────────────────────
首部  function FileSeek(Handle, Offset, Origin: Integer): Integer; overload; $[SysUtils.pas
首部  function FileSeek(Handle: Integer; const Offset: Int64; Origin: Integer): Int64; overload; $[SysUtils.pas
功能  返回指定文件偏移量
说明  Offset指定偏移量;Origin指定原点(Origin为0时指文件首;为1时指当前位置;为2时指文件尾)
参考  function Windows.SetFilePointer
例子  <参见FileOpen>
────────────────────────
首部  procedure FileClose(Handle: Integer); $[SysUtils.pas
功能  返回关闭文件
说明  不关闭打开的文件会占用系统资源
参考  function Windows.CloseHandle
例子  <参见FileOpen>
────────────────────────  
首部  function FileAge(const FileName: string): Integer; $[SysUtils.pas
功能  返回文件创建的时间
说明  文件不存在则返回-1
参考  function Windows.FindFirstFile
例子
///////Begin FileAge,DateTimeToStr,FileDateToDateTime
procedure TForm1.Button1Click(Sender: TObject);
begin
  SpinEdit1.Value := FileAge(Edit1.Text);
  if SpinEdit1.Value > 0 then
    Edit2.Text := DateTimeToStr(FileDateToDateTime(SpinEdit1.Value));
end;
///////End FileAge,DateTimeToStr,FileDateToDateTime
────────────────────────
首部  function FileExists(const FileName: string): Boolean; $[SysUtils.pas
功能  返回文件名FileName是否有实体存在
说明  包括隐藏文件
参考  function SysUtils.FileAge
例子  CheckBox1.Checked := FileExists(Edit1.Text);
────────────────────────  
首部  function DirectoryExists(const Directory: string): Boolean; $[SysUtils.pas
功能  返回目录名FileName是否有实体存在
说明  包括隐藏目录
参考  function Windows.GetFileAttributes
例子  CheckBox1.Checked := DirectoryExists(Edit1.Text);
────────────────────────
首部  function ForceDirectories(Dir: string): Boolean; $[SysUtils.pas
功能  返回创建子目录是否成功
说明  直接创建多级目录
参考  function SysUtils.CreateDir
例子  CheckBox1.Checked := ForceDirectories(Edit1.Text);
────────────────────────
首部  function FindFirst(const Path: string; Attr: Integer; var F: TSearchRec): Integer; $[SysUtils.pas
功能  返回设置文件搜索
说明  搜索成功则返回0
参考  function Windows.FindFirstFile
例子
///////Begin FindFirst,FindNext,FindClose
procedure TForm1.Button1Click(Sender: TObject);
var
  vSearchRec: TSearchRec;
  I: Integer;
begin
  Memo1.Clear;
  I := FindFirst(Edit1.Text, faAnyFile, vSearchRec);
  while I = 0 do begin
    Memo1.Lines.Add(vSearchRec.Name);
    I := FindNext(vSearchRec);
  end;
  FindClose(vSearchRec);
end;
///////End FindFirst,FindNext,FindClose
────────────────────────
首部  function FindNext(var F: TSearchRec): Integer; $[SysUtils.pas
功能  返回继续文件搜索
说明  搜索成功则返回0
参考  function Windows.FindNextFile
例子  <参见FindFirst>
────────────────────────
首部  procedure FindClose(var F: TSearchRec); $[SysUtils.pas
功能  结束当前文件搜索
说明  不关闭查询会占用系统资源
参考  function Windows.FindClose
例子  <参见FindFirst>
────────────────────────
首部  function FileGetDate(Handle: Integer): Integer; $[SysUtils.pas
功能  返回文件的修改时间
说明  读取失败则返回-1
参考  function Windows.GetFileTime
例子
///////Begin FileGetDate
procedure TForm1.Button1Click(Sender: TObject);
var
  I: Integer;
begin
  I := FileOpen(Edit1.Text, fmOpenRead);
  if I < 0 then Exit;
  SpinEdit1.Value := FileGetDate(I);
  Edit2.Text := DateTimeToStr(FileDateToDateTime(SpinEdit1.Value));
  FileClose(I);
end;
///////End FileGetDate
────────────────────────
首部  function FileSetDate(const FileName: string; Age: Integer): Integer; overload; $[SysUtils.pas
首部  function FileSetDate(Handle: Integer; Age: Integer): Integer; overload; platform; $[SysUtils.pas
功能  返回设置文件的修改时间
说明  修改成功则返回0
参考  function Windows.SetFileTime
例子  SpinEdit1.Value := FileSetDate(Edit1.Text, DateTimeToFileDate(StrToDateTime(Edit2.Text)));
────────────────────────  
首部  function FileGetAttr(const FileName: string): Integer; platform; $[SysUtils.pas
功能  返回文件的属性
说明  读取失败则返回$FFFFFFFF
参考  function Windows.GetFileAttributes
例子  SpinEdit1.Value := FileGetAttr(Edit1.Text);
────────────────────────
首部  function FileSetAttr(const FileName: string; Attr: Integer): Integer; platform; $[SysUtils.pas
功能  返回设置文件的属性
说明  设置成功则返回0
参考  function Windows.SetFileAttributes
例子  SpinEdit1.Value := FileSetAttr(Edit1.Text, SpinEdit2.Value);
────────────────────────
首部  function FileIsReadOnly(const FileName: string): Boolean; $[SysUtils.pas
功能  返回文件是否只读
说明  文件不存在看作只读
参考  function Windows.GetFileAttributes
例子  CheckBox1.Checked := FileIsReadOnly(Edit1.Text);
────────────────────────
首部  function FileSetReadOnly(const FileName: string; ReadOnly: Boolean): Boolean; $[SysUtils.pas
功能  返回设置文件是否只读是否成功
说明  文件不存在则返回False
参考  function Windows.GetFileAttributes;function Windows.SetFileAttributes
例子  CheckBox1.Checked := FileSetReadOnly(Edit1.Text, CheckBox2.Checked);
────────────────────────  
首部  function DeleteFile(const FileName: string): Boolean; $[SysUtils.pas
功能  返回删除文件是否成功
说明  文件不存在则返回False
参考  function Windows.DeleteFile
例子  CheckBox1.Checked := DeleteFile(Edit1.Text);
────────────────────────
首部  function RenameFile(const OldName, NewName: string): Boolean; $[SysUtils.pas
功能  返回重命名文件是否成功
说明  文件不存在则返回False
参考  function Windows.MoveFile
例子  CheckBox1.Checked := RenameFile(Edit1.Text, Edit2.Text);
────────────────────────
首部  function ChangeFileExt(const FileName, Extension: string): string; $[SysUtils.pas
功能  返回改变扩展名后的文件名
说明  [注意]扩展名Extension前要加点;ChangeFileExt('a.jpg', 'bmp')='abmp'
参考  function SysUtils.LastDelimiter;function System.Copy
例子  Edit1.Text := ChangeFileExt(Edit2.Text, Edit3.Text);
────────────────────────
首部  function ExtractFilePath(const FileName: string): string; $[SysUtils.pas
功能  返回文件名所在的路径
说明  ExtractFilePath('C:\')='C:\';ExtractFilePath('\\Server\Tool\Calc.exe')='\\Server\Tool\'
参考  function SysUtils.LastDelimiter;function System.Copy
例子  Edit1.Text := ExtractFilePath(Edit2.Text);
────────────────────────
首部  function ExtractFileDir(const FileName: string): string; $[SysUtils.pas
功能  返回文件名所在的目录
说明  ExtractFileDir('C:\')='C:\';ExtractFileDir('\\Server\Tool\Calc.exe')='\\Server\Tool'
参考  function SysUtils.LastDelimiter;function System.Copy
例子  Edit1.Text := ExtractFileDir(Edit2.Text);
────────────────────────
首部  function ExtractFileDrive(const FileName: string): string; $[SysUtils.pas
功能  返回文件名所在驱动器
说明  ExtractFileDrive('C:\')='C:';ExtractFileDrive('\\Server\Tool\Calc.exe')='\\Server\Tool'
参考  function System.Copy
例子  Edit1.Text := ExtractFileDrive(Edit2.Text);
────────────────────────
首部  function ExtractFileName(const FileName: string): string; $[SysUtils.pas
功能  返回绝对文件名
说明  ExtractFileName('C:\')='';ExtractFileName('\\Server\Tool\Calc.exe')='Calc.exe'
参考  function SysUtils.LastDelimiter;function System.Copy
例子  Edit1.Text := ExtractFileName(Edit2.Text);
────────────────────────
首部  function ExtractFileExt(const FileName: string): string; $[SysUtils.pas
功能  返回文件名的扩展名
说明  ExtractFileExt('C:\')='';ExtractFileExt('\\Server\Tool\Calc.exe')='.exe'
参考  function SysUtils.LastDelimiter;function System.Copy
例子  Edit1.Text := ExtractFileExt(Edit2.Text);
────────────────────────
首部  function ExpandFileName(const FileName: string): string; $[SysUtils.pas
功能  返回文件名的完整表示
说明  ExpandFileName('hello.pas')='C:\Program Files\Borland\Delphi6\Projects\hello.pas'
参考  function Windows.GetFullPathName
例子  Edit1.Text := ExpandFileName(Edit2.Text);
────────────────────────
首部  function ExpandFileNameCase(const FileName: string; out MatchFound: TFilenameCaseMatch): string; $[SysUtils.pas
功能  分情况返回文件名的完整表示
说明  type TFilenameCaseMatch = (mkNone, mkExactMatch, mkSingleMatch, mkAmbiguous);
参考  function Windows.GetFullPathName;function SysUtils.SameFileName;function SysUtils.FindFirst
例子
///////Begin ExpandFileNameCase
procedure TForm1.Button1Click(Sender: TObject);
var
  vFilenameCaseMatch: TFilenameCaseMatch;
begin
  Edit1.Text := ExpandFileNameCase(Edit2.Text, vFilenameCaseMatch);
  SpinEdit1.Value := Ord(vFilenameCaseMatch);
end;
///////End ExpandFileNameCase
────────────────────────
首部  function ExpandUNCFileName(const FileName: string): string; $[SysUtils.pas
功能  返回LINUX文件名的完整表示
说明  ExpandUNCFileName('C:/')='C:\'
参考  function SysUtils.ExpandFileName
例子  Edit1.Text := ExpandUNCFileName(Edit2.Text);
────────────────────────
首部  function ExtractRelativePath(const BaseName, DestName: string): string; $[SysUtils.pas
功能  返回参数的相对路径
说明  ExtractRelativePath('C:\Windows\', 'C:\Windows\System')='System'
参考  function SysUtils.SameFilename;function SysUtils.ExtractFileDrive
例子  Edit1.Text := ExtractRelativePath(Edit2.Text, Edit3.Text);
────────────────────────
首部  function ExtractShortPathName(const FileName: string): string; $[SysUtils.pas
功能  返回参数的DOS路径
说明  ExtractShortPathName('C:\Program Files\Borland')='C:\PROGRA~1\BORLAND'
参考  function Windows.GetShortPathName
例子  Edit1.Text := ExtractShortPathName(Edit2.Text);
────────────────────────
首部  function FileSearch(const Name, DirList: string): string; $[SysUtils.pas
功能  返回目录列表中DirList搜索的第一个结果
说明  FileSearch('Calc.exe', 'd:\winxp\system32;c:\windows')='d:\winxp\system32\calc.exe'
参考  function SysUtils.FileExists;function SysUtils.AnsiLastChar
例子  Edit1.Text := FileSearch(Edit2.Text, Edit3.Text);
────────────────────────
首部  function DiskFree(Drive: Byte): Int64; $[SysUtils.pas
功能  返回驱动器可用空间
说明  参数Drive为0表示当前路径,为1表示=A驱,为2表示=B驱...;获取失败则返回-1
参考  function Windows.GetDiskFreeSpaceExA
例子  SpinEdit1.Value := DiskFree(SpinEdit2.Value);
────────────────────────
首部  function DiskSize(Drive: Byte): Int64; $[SysUtils.pas
功能  返回驱动器全部空间
说明  参数Drive为0表示当前路径,为1表示=A驱,为2表示=B驱...;获取失败则返回-1
参考  function Windows.GetDiskFreeSpaceExA
例子  SpinEdit1.Value := DiskSize(SpinEdit2.Value);
────────────────────────
首部  function FileDateToDateTime(FileDate: Integer): TDateTime; $[SysUtils.pas
功能  返回将DOS的日期格式转换为DELPHI的日期格式
说明  FileDate非法是将触发异常
参考  function SysUtils.EncodeDate;function SysUtils.EncodeTime
例子  <参见FileAge>
────────────────────────
首部  function DateTimeToFileDate(DateTime: TDateTime): Integer; $[SysUtils.pas
功能  返回将DELPHI的日期格式转换为DOS的日期格式
说明  年份在1980到2107之外则返回0
参考  function SysUtils.DecodeDate;function SysUtils.DecodeTime
例子  <参见FileSetDate>
────────────────────────  
首部  function GetCurrentDir: string; $[SysUtils.pas
功能  返回当前操作目录
说明  [注意]调用文件对话框会改变当前操作目录
参考  function System.GetDir
例子  Edit1.Text := GetCurrentDir;
────────────────────────  
首部  function SetCurrentDir(const Dir: string): Boolean; $[SysUtils.pas
功能  返回设置当前操作目录是否成功
说明  [注意]调用文件对话框会改变当前操作目录
参考  function Windows.SetCurrentDirectory
例子  CheckBox1.Checked := SetCurrentDir(Edit1.Text);
────────────────────────
首部  function CreateDir(const Dir: string): Boolean; $[SysUtils.pas
功能  返回创建目录是否成功
说明  不支持多级目录;已经存在则返回False
参考  function Windows.CreateDirectory
例子  CheckBox1.Checked := CreateDir(Edit1.Text);
────────────────────────
首部  function RemoveDir(const Dir: string): Boolean; $[SysUtils.pas
功能  返回删除目录是否成功
说明  必须是空目录
参考  function Windows.RemoveDirectory
例子  CheckBox1.Checked := RemoveDir(Edit1.Text);
────────────────────────
首部  function StrLen(const Str: PChar): Cardinal; $[SysUtils.pas
功能  返回指针字符串的长度
说明  当指针字符串Str为nil时将触发异常
参考  <NULL>
例子  SpinEdit2.Value := StrLen(PChar(Edit1.Text));
────────────────────────
首部  function StrEnd(const Str: PChar): PChar; $[SysUtils.pas
功能  返回指针字符串的结尾
说明  当指针字符串Str为nil时将触发异常
参考  <NULL>
例子  Edit2.Text := StrEnd(PChar(Edit1.Text)) - SpinEdit1.Value;
。。

Answer 1

to: zswang(伴水)(需要充充电)　写完能发一份给我么？[email protected]谢谢！

Answer 2

我也要一份，[email protected],谢谢。

Answer 3

我也要一份，[email protected],谢谢。 

Answer 4

大家不要着急,到时我会发布在CSDN上
我所有绌作将整理在Kingron的网页上

Answer 5

名称                        类型        说明
----------------------------------------------------------------------------------
Abort                      函数        引起放弃的意外处理 
Abs                        函数        绝对值函数 
AddExitProc                函数        将一过程添加到运行时库的结束过程表中 
Addr                        函数        返回指定对象的地址 
AdjustLineBreaks            函数        将给定字符串的行分隔符调整为CR/LF序列 
Align                      属性        使控件位于窗口某部分 
Alignment                  属性        控件标签的文字位置 
AllocMem                    函数        在堆栈上分配给定大小的块 
AllowGrayed                属性        允许一个灰度选择 
AnsiCompareStr              函数        比较字符串（区分大小写） 
AnsiCompareText            函数        比较字符串（不区分大小写） 
AnsiLowerCase              函数        将字符转换为小写 
AnsiUpperCase              函数        将字符转换为大写 
Append                      函数        以附加的方式打开已有的文件 
ArcTan                      函数        余切函数 
AssignFile                  函数        给文件变量赋一外部文件名 
Assigned                    函数        测试函数或过程变量是否为空 
AutoSize                    属性        自动控制标签的大小 
BackgroundColor            属性        背景色 
BeginThread                函数        以适当的方式建立用于内存管理的线程 
BevelInner                  属性        控件方框的内框方式 
BevelOuter                  属性        控件方框的外框方式 
BevelWidth                  属性        控件方框的外框宽度 
BlockRead                  函数        读一个或多个记录到变量中 
BlockWrite                  函数        从变量中写一个或多个记录 
BorderStyle                属性        边界类型 
BorderWidth                属性        边界宽度 
Break                      命令        终止for、while、repeat循环语句 
Brush                      属性        画刷 
Caption                    属性        标签文字的内容 
ChangeFileExt              函数        改变文件的后缀 
ChDir                      函数        改变当前目录 
Checked                    属性        确定复选框选中状态 
Chr                        函数        返回指定序数的字符 
CloseFile                  命令        关闭打开的文件 
Color                      属性        标签的颜色 
Columns                    属性        显示的列数 
CompareStr                  函数        比较字符串（区分大小写） 
Concat                      函数        合并字符串 
Continue                    命令        继续for、while、repeat的下一个循环 
Copy                        函数        返回一字符串的子串 
Cos                        函数        余弦函数 
Ctl3D                      属性        是否具有3D效果 
Cursor                      属性        鼠标指针移入后的形状 
Date                        函数        返回当前的日期 
DateTimeToFileDate          函数        将DELPHI的日期格式转换为DOS的日期格式 
DateTimeToStr              函数        将日期时间格式转换为字符串 
DateTimeToString            函数        将日期时间格式转换为字符串 
DateToStr                  函数        将日期格式转换为字符串 
DayOfWeek                  函数        返回星期的数值 
Dec                        函数        递减变量值 
DecodeDate                  函数        将日期格式分解为年月日 
DecodeTime                  函数        将时间格式分解为时、分、秒、毫秒 
Delete                      函数        从字符串中删除子串 
DeleteFile                  命令        删除文件 
DiskFree                    函数        返回剩余磁盘空间的大小 
DiskSize                    函数        返回指定磁盘的容量 
Dispose                    函数        释放动态变量所占的空间 
DisposeStr                  函数        释放字符串在堆栈中的内存空间 
DitherBackground            属性        使背景色的色彩加重或减少50% 
DragCursor                  属性        当鼠标按下时光标的形状 
DragMode                    属性        按动的作用方式 
DropDownCount              属性        容许的显示数据项的数目 
EditMask                    属性        编辑模式 
Enabled                    属性        是否使标签呈现打开状态 
EncodeDate                  函数        将年月日合成为日期格式 
EncodeTime                  函数        将时、分、秒、毫秒合成为时间格式 
EndMargin                  属性        末尾边缘 
Eof                        函数        对有类型或无类型文件测试是否到文件尾 
Eoln                        函数        返回文本文件的行结束状态 
Erase                      命令        删除外部文件 
ExceptAddr                  函数        返回引起当前意外的地址 
Exclude                    函数        从集合中删除一些元素 
ExceptObject                函数        返回当前意外的索引 
Exit                        命令        立即从当前的语句块中退出 
Exp                        函数        指数函数 
ExpandFileName              函数        返回包含绝对路径的字符串 
ExtendedSelect              属性        是否允许存在选择模式，True时，MultiSelect才有意义 
ExtractFileDir              函数        返回驱动器和路径 
ExtractFileExt              函数        返回文件的后缀 
ExtractFileName            函数        返回文件名 
ExtractFilePath            函数        返回指定文件的路径 
FileAge                    函数        返回文件已存在的时间 
FileClose                  命令        关闭指定的文件 
FileCreate                  命令        用指定的文件名建立新文件 
FileDateToDateTime          函数        将DOS的日期格式转换为DELPHI的日期格式 
FileExists                  函数        检查文件是否存在 
FileGatAttr                函数        返回文件的属性 
FileGetDate                函数        返回文件的DOS日期时间标记 
FileOpen                    命令        用指定的存取模式打开指定的文件 
FilePos                    函数        返回文件的当前指针位置 
FileRead                    命令        从指定的文件读取 
FileSearch                  命令        在目录中搜索指定的文件 
FileSeek                    函数        改变文件的指针 
FileSetAttr                函数        设置文件属性 
FileSetDate                函数        设置文件的DOS日期时间标记 
FileSize                    函数        返回当前文件的大小 
FileWrite                  函数        对指定的文件做写操作 
FillChar                    函数        用指定的值填充连续字节的数 
FindClose                  命令        终止FindFirst/FindNext序列 
FindFirst                  命令        对指定的文件名及属性搜索目录 
FindNext                    命令        返回与文件名及属性匹配的下一入口 
FloatToDecimal              函数        将浮点数转换为十进制数 
FloatToStrF                函数        将浮点数转换为字符串 
FloatToStr                  函数        将浮点数转换为字符串 
FloatToText                函数        将给定的浮点数转换为十进制数 
FloatToTextFmt              函数        将给定的浮点数转换为十进制数 
Flush                      函数        将缓冲区的内容刷新到输出的文本文件中 
FmtLoadStr                  函数        从程序的资源字符串表中装载字符串 
FmtStr                      函数        格式化一系列的参数，其结果以参数Result返回 
Font                        属性        设置字体 
Format                      函数        格式化一系列的参数并返回Pascal字符串 
FormatBuf                  函数        格式化一系列的参数 
FormatDateTime              函数        用指定的格式来格式化日期和时间 
FormatFloat                函数        指定浮点数格式 
Frac                        函数        返回参数的小数部分 
FreeMem                    函数        按给定大小释放动态变量所占的空间 
GetDir                                  返回指定驱动器的当前目录 
GetHeapStatus                            返回内存管理器的当前状态 
GetMem                                  建立一指定大小的动态变量，并将指针指向该处 
GetMemoryManager                        返回内存管理器的入口点 
Glyph                      函数        按钮上的图象 
Halt                                    停止程序的执行并返回到操作系统 
Hi                                      返回参数的高地址位 
High                                    返回参数的上限值 
Hint                        属性        提示信息 
Int                                      返回参数的整数部分 
Include                                  添加元素到集合中 
Insert                                  在字符串中插入子串 
IntToHex                                将整型数转换为十六进制数 
IntToStr                                将整型数转换为字符串 
IOResult                                返回最新的I/O操作完成状态 
IsValidIdent                            测试字符串是否为有效的标识符 
Items                      属性        默认显示的节点 
Kind                        属性        摆放样式
LargeChange                属性        最大改变值 
Layout                      属性        图象布局 
Length                      函数        返回字符串的动态长度 
Lines                      属性        缺省显示内容 
Ln                          函数        自然对数函数 
Lo                          函数        返回参数的低地址位 
LoadStr                    函数        从应用程序的可执行文件中装载字符资源 
LowerCase                  函数        将给定的字符串变为小写 
Low                        函数        返回参数的下限值 
Max                        属性        最大值 
MaxLength                  属性        最大长度 
Min                        属性        最小值 
MkDir                      命令        建立一子目录 
Move                        函数        从源到目标复制字节 
MultiSelect                属性        允许同时选择几个数据项 
Name                        属性        控件的名字 
New                        函数        建立新的动态变量并设置一指针变量指向他 
NewStr                      函数        在堆栈上分配新的字符串 
Now                        函数        返回当前的日期和时间 
Odd                                      测试参数是否为奇数 
OnActivate                  事件        焦点移到窗体上时触发 
OnClick                    事件        单击窗体空白区域触发 
OnDblClick                  事件        双击窗体空白区域触发 
OnCloseQuery                事件        使用者试图关闭窗体触发 
OnClose                    事件        窗体关闭后才触发 
OnCreate                    事件        窗体第一次创建时触发 
OnDeactivate                事件        用户切换到另一应用程序触发 
OnDragDrop                  事件        鼠标拖放操作结束时触发 
OnDragOver                  事件        有其他控件从他上面移过触发 
OnMouseDown                事件        按下鼠标键时触发 
OnMouseUp                  事件        释放鼠标键时触发 
OnMouseMove                事件        移动鼠标时触发 
OnHide                      事件        隐藏窗体时触发 
OnKeyDown                  事件        按下键盘某键时触发 
OnKeyPress                  事件        按下键盘上的单个字符键时触发 
OnKeyUp                    事件        释放键盘上的某键时触发 
OnPaint                    事件        窗体上有新部分暴露出来触发 
OnResize                    事件        重新调整窗体大小触发 
OnShow                      事件        在窗体实际显示之前瞬间触发 
Ord                                      返回序数类的序数 
OutlineStyle                属性        类型 
OutOfMemoryError                        引起OutOfMemory意外 
PageIndex                  属性        页索引 
Pages                      属性        页 
ParamCount                  函数        返回在命令行上传递给程序的参数数量 
ParamStr                    函数        返回指定的命令行参数 
Pen                        属性        画刷设置 
Pi                          函数        返回圆周率Pi 
Picture                    属性        显示图象 
PictureClosed              属性        设置Closed位图 
PictureLeaf                属性        设置Leaf位图 
PictureMinus                属性        设置Minus位图 
PictureOpen                属性        设置Open位图 
PicturePlus                属性        设置Plus位图 
Pos                        函数        在字符串中搜索子串 
Pred                        函数        返回先前的参数 
Random                      函数        返回一随机函数 
Randomize                  函数        用一随机数初始化内置的随机数生成器 
Read                        函数        对有格式的文件，读一文件组件到变量中；
                                        对文本文件，读一个或多个值到一个或多个变量中 
Readln                      函数        执行Read过程，然后跳到文件下一行 
ReadOnly                    属性        只读属性 
ReAllocMem                  函数        分配一动态变量 
Rename                      函数        重命名外部文件 
RenameFile                  函数        对文件重命名 
Reset                      函数        打开已有的文件 
Rewrite                    函数        建立并打开一新的文件 
RmDir                      函数        删除空的子目录 
Round                      函数        将实数值舍入为整型值 
RunError                    函数        停止程序的执行 
ScrollBars                  属性        滚动条状态 
Seek                        函数        将文件的当前指针移动到指定的组件上 
SeekEof                    函数        返回文件的文件结束状态 
SeekEoln                    函数        返回文件的行结束状态 
SelectedColor              属性        选中颜色 
SetMemoryManager            函数        设置内存管理器的入口点 
SetTextBuf                  函数        给文本文件指定I/O缓冲区 
Shape                      属性        显示的形状 
ShowException              函数        显示意外消息与地址 
Sin                        函数        正弦函数 
SizeOf                      函数        返回参数所占的字节数 
SmallChange                属性        最小改变值 
Sorted                      属性        是否允许排序 
Sqr                        函数        平方函数 
Sqrt                        函数        平方根函数 
StartMargin                属性        开始边缘 
State                      属性        控件当前状态 
Str                        函数        将数值转换为字符串
StrAlloc                    函数        给以NULL结束的字符串分配最大长度-1的缓冲区 
StrBufSize                  函数        返回存储在由StrAlloc分配的字符缓冲区的最大字符数 
StrCat                      函数        将一字符串附加到另一字符串尾并返回合并的字符串 
StrComp                    函数        比较两个字符串 
StrCopy                    函数        将一个字符串复制到另一个字符串中 
StrDispose                  函数        释放堆栈上的字符串 
StrECopy                    函数        将一字符串复制到另一个字符串并返回结果字符串尾部的指针 
StrEnd                      函数        返回指向字符串尾部的指针 
Stretch                    属性        自动适应控件的大小 
StrFmt                      函数        格式化一系列的参数 
StrIComp                    函数        比较两个字符串（不区分大小写） 
StringToWideChar            函数        将ANSI字符串转换为UNICODE字符串 
StrLCat                    函数        将一字符串中的字符附加到另一字符串尾并返回合并的字符串 
StrLComp                    函数        以最大长度比较两个字符串 
StrLCopy                    函数        将一个字符串中的字符复制到另一个字符串中 
StrLen                      函数        返回字符串中的字符数 
StrLFmt                    函数        格式化一系列的参数，其结果中包含有指向目标缓冲区的指针 
StrLIComp                  函数        以最大长度比较两个字符串（不区分大小写） 
StrLower                    函数        将字符串中的字符转换为小写 
StrMove                    函数        将一个字符串中的字符复制到另一个字符串中 
StrNew                      函数        在堆栈上分配一个字符串 
StrPas                      函数        将以NULL结束的字符串转换为PASCAL类的字符串 
StrPCopy                    函数        将PASCAL类的字符串复制为以NULL结束的字符串 
StrPLCopy                  函数        从PASCAL类的最大长度字符串复制为以NULL结束的字符串 
StrPos                      函数        返回一个字符串在另一个字符串中首次出现指针 
StrRScan                    函数        返回字符串中最后出现字符的指针 
StrScan                    函数        返回字符串中出现首字符的指针 
StrToDate                  函数        将字符串转换为日期格式 
StrToDateTime              函数        将字符串转换为日期/时间格式 
StrToFloat                  函数        将给定的字符串转换为浮点数 
StrToInt                    函数        将字符串转换为整型 
StrToIntDef                函数        将字符串转换为整型或默认值 
StrToTime                  函数        将字符串转换为时间格式 
StrUpper                    函数        将字符串中的字符转换为大写 
Style                      属性        类型选择 
Suce                        函数        返回后继的参数 
Swap                        函数        交换参数的高低地址位 
Tabs                        属性        标记每一项的内容 
TabIndex                    属性        标记索引 
Text                        属性        显示的文本 
TextToFloat                函数        将字符串（以NULL结束的格式）转换为浮点数 
Time                        函数        返回当前的时间 
TimeToStr                  函数        将时间格式转换为字符串 
Trim                        函数        从给定的字符串中删除前导和尾部的空格及控制字符 
TrimLeft                    函数        从给定的字符串中删除首部的空格及控制字符 
TrimRight                  函数        从给定的字符串中删除尾部的空格及控制字符 
Trunc                      函数        将实型值截取为整型值 
Truncate                    函数        截去当前文件位置后的内容 
UnSelectedColor            属性        未选中颜色 
UpCase                                  将字符转换为大写 
UpperCase                                将给定的字符串变为大写 
Val                        函数        将字符串转换为整型值 
VarArrayCreate              函数        以给定的界限和维数建立变体数组 
VarArrayDimCount            函数        返回给定变体的维数 
VarArrayHighBound          函数        返回给定变体数组维数的上界 
VarArrayLock                函数        锁定给定的变体数组 
VarArrayLowBound            函数        返回给定变体数组维数的下界 
VarArrayOf                  函数        返回指定变体的数组元素 
VarArrayRedim              函数        通过改变上限来调整变体的大小 
VarArrayUnlock              函数        解锁指定的变体数组 
VarAsType                  函数        将变体转换为指定的类型 
VarCase                    函数        将变体转换为指定的类型并保存他 
VarClear                    函数        清除指定的变体 
VarCopy                    函数        将指定的变体复制为指定的变体 
VarFormDateTime            函数        返回包含日期时间的变体 
VarIsArray                  函数        测试变体是否为数组 
VarIsEmpty                  函数        测试变体是否为UNASSIGNED 
VarIsNull                  函数        测试变体是否为NULL 
VarToDateTime              函数        将给定的变体转换为日期时间 
VarType                    函数        将变体转换为指定的类型并保存他 
Visible                    属性        控件的可见性 
WantReturns                属性        为True时，按回车键产生一个回车符；
                                        为False时，按下Ctrl+Enter才产生回车符 
Write                      命令        对有格式的文件，写一变量到文件组件中；
                                        对文本文件，写一个或多个值到文件中 
Writeln                    命令        执行WRITE过程，然后输出一行结束标志 
WideCharLenToString        函数        将ANSI字符串转换为UNICODE字符串 
WideCharLenToStrWar        函数        将UNICODE字符串转换为ANSI字符串变量 
WideCharToString            函数        将UNICODE字符串转换为ANSI字符串 
WideCharToStrVar            函数        将UNICODE字符串转换为ANSI字符串变量 

Answer 6

to zswang(伴水)(需要充充电):
写完后发一份给我，我先结贴了，谢谢！