转至繁体中文版     | 网站首页 | 图文教程 | 资源下载 | 站长博客 | 图片素材 | 武汉seo | 武汉网站优化 | 
最新公告:     敏韬网|教学资源学习资料永久免费分享站!  [mintao  2008年9月2日]        
您现在的位置: 学习笔记 >> 图文教程 >> 软件开发 >> Delphi程序 >> 正文
Delphi 函数参考         ★★★★

Delphi 函数参考

作者:闵涛 文章来源:闵涛的学习笔记 点击数:5711 更新时间:2009/4/23 18:27:19
      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;区分大小写;Length(长度)
      参考 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的最后一个指针字符
   &

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] [10]  ...  下一页 >> 


[系统软件]InstallShield Express for delphi制作安装程序定…  [常用软件]InstallShield Express制作Delphi数据库安装程序
[Delphi程序]为什么选择Delphi.Net ?  [Delphi程序]《关于VisiBroker For Delphi的使用》(4)
[Delphi程序]Delphi 程序员代码编写标准指南  [Delphi程序]转贴:Conversion to Delphi 6: Missing unit Pro…
[Delphi程序]Borland Delphi 9 的新特性  [Delphi程序]Delphi 键盘码表
[Delphi程序]Chuck Jazdzewski的离开意味着Delphi的终结吗?  [Delphi程序]Delphi Access violations 问题的解决之道
教程录入:mintao    责任编辑:mintao 
  • 上一篇教程:

  • 下一篇教程:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      注:本站部分文章源于互联网,版权归原作者所有!如有侵权,请原作者与本站联系,本站将立即删除! 本站文章除特别注明外均可转载,但需注明出处! [MinTao学以致用网]
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)

    同类栏目
    · C语言系列  · VB.NET程序
    · JAVA开发  · Delphi程序
    · 脚本语言
    更多内容
    热门推荐 更多内容
  • 没有教程
  • 赞助链接
    更多内容
    闵涛博文 更多关于武汉SEO的内容
    500 - 内部服务器错误。

    500 - 内部服务器错误。

    您查找的资源存在问题,因而无法显示。

    | 设为首页 |加入收藏 | 联系站长 | 友情链接 | 版权申明 | 广告服务
    MinTao学以致用网

    Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved.
    闵涛 投放广告、内容合作请Q我! E_mail:admin@mintao.net(欢迎提供学习资源)

    站长:MinTao ICP备案号:鄂ICP备11006601号-18

    闵涛站盟:医药大全-武穴网A打造BCD……
    咸宁网络警察报警平台