摘要: //最常用的 string var str: string; {定义} begin str := '万一'; {赋值} ShowMessage(IntToStr(Length(str))); {长度是: 4} end; //长字符串 AnsiString; 在当前版本(2007)中的默认状态下, S 阅读全文
posted @ 2017-08-02 14:10 夏天的西瓜君 阅读(343) 评论(0) 推荐(0)
摘要: var s: string; begin //指令类型 type s := Format('最大整数是: %d; 最小整数是: %d',[MaxInt,Low(Integer)]); //返回: 最大整数是: 2147483647; 最小整数是: -2147483648 { 提示: 格式指令必须以 阅读全文
posted @ 2017-08-02 13:38 夏天的西瓜君 阅读(201) 评论(0) 推荐(0)
摘要: procedure TForm1.Button1Click(Sender: TObject); var s1: AnsiString; //单字节储存 s2: WideString; //双字节储存 begin s1 := '万一OK'; s2 := '万一OK'; ShowMessage(s1[1 阅读全文
posted @ 2017-08-02 10:44 夏天的西瓜君 阅读(208) 评论(0) 推荐(0)