字符型:string 浮点型:real 整数:integer DELPHI的浮点数声明不是用float,而是用real(8个字节),single(8个字节,单精度浮点),double(16个字节,双精度浮点) 数组:array 一维 var a:array[1..5] of integer=(1,2,3,4,5) a:array[1..5] of string 二维 var MyArr: array[0..2, 0..2] of Integer; 动态定义数组 var arr:array o
//判断字符是否是汉字 function IsHZ(ch: WideChar): boolean; var i:integer; begin i:=ord(ch); if( i<19968) or (i>40869) then result:=false else result:=true; end; //判断字符是否是汉字 function IsHZ(ch: WideChar): boolean; var i:integer; begin i:=ord(ch); if( i<19968
字母重排 输入一个字典(用***结尾),然后再输入若干单词.没输入一个单词w,都需要在字典中找出所有可以用w的字幕重排后得到的单词,并按照字典序从小到大的顺序在一行中输出,如果不存在,输出“:(”.单词间用空格隔开,且所有输入单词都由不超过6个小写字母组成. 样例输入: tarp given score refund only trap work earn course ***** aptr asdfg 样例输出: part tarp trap :( 程序: #include <iostream
http://blog.csdn.net/nerdy/article/details/8969189 [delphi]运行cmd命令,并取得输出字符 标签: delphiCMD命令 2013-05-24 11:36 1529人阅读 评论(0) 收藏 举报 分类: delphi实例(2) procedure CheckResult(b: Boolean); begin if not b then raise Exception.Create(SysErrorMessage(GetLastEr