【Delphi System 单元】
系统相关函数
再创世纪
这个作者很懒,什么都没留下…
展开
专栏收录文章
- 默认排序
- 最新发布
- 最早发布
- 最多阅读
- 最少阅读
-
System.Odd - 判断一个整数是不是奇数
var i: Integer; b: Boolean;begin i := 11; b := Odd(i); {是奇数返回真} ShowMessage(BoolToStr(b)); {True} i := 12; b := Odd(i); ShowMessage(BoolToStr(b)); {False}end;转载 2013-10-15 09:54:54 · 672 阅读 · 0 评论 -
System.Delete - 从字符串中删除
procedure Delete( var S: String; {源字符串; 因为是 var 参数, 不可能是个常量} Index: Integer; {起始位置; 第一个字符的位置是 1, 起始位置不能小于 1 } Count: Integer {要删除的字数});举例:var s: string;begin s := 'Delphi转载 2013-10-15 09:57:15 · 829 阅读 · 0 评论 -
System.Copy - 从字符串或数组中复制
function Copy( S: String; {字符串或动态数组} Index: Integer; {起始位置} Count: Integer {Copy 个数}): String; {如果参数 S 是动态数组, 这里也应该返回动态数组}举例://从字符串中提取var ss,s: string;begin ss := 'Co转载 2013-10-15 09:57:47 · 927 阅读 · 0 评论 -
System 单元下的公用函数目录
有简单提示的链接有效.过程或函数名 分类 简单提示 Abs 绝对值AcquireExceptionObject AddModuleUnloadProc Addr AllocMem转载 2013-10-15 09:55:22 · 577 阅读 · 0 评论
分享