摘要: '' = '''B' > 'A''AX' 'ABAB''ABABCCC' '''ABCD' >= 'ABAB''的' > '啊''的' > 'a''的' > '0''a' > '0''9' > '0'//以上表达式均为 True 阅读全文
posted @ 2013-07-08 23:08 万大侠 阅读(257) 评论(0) 推荐(0) 编辑
摘要: procedure TForm1.Button1Click(Sender: TObject);var s1: AnsiString; //单字节储存 s2: WideString; //双字节储存begin s1 := '万一OK'; s2 := '万一OK'; ShowMessage(s1[1]); //显示乱码 ShowMessage(s2[1]); //万 ShowMessage(IntToStr(Length(s1))); //6 ShowMessage(IntToStr(Length(s2))); //4 ShowMessage(IntToStr(Si 阅读全文
posted @ 2013-07-08 23:07 万大侠 阅读(140) 评论(0) 推荐(0) 编辑
摘要: procedure TForm1.Button1Click(Sender: TObject);var s1: ShortString; //为兼容老版本而存在 s2: string; //长字串,相当于动态字符数组 s3: string[10]; //短字串,相当于静态字符数组,代替 ShortStringbegin ShowMessage(IntToStr(SizeOf(s1))); //256 ShowMessage(IntToStr(SizeOf(s2))); //4 ShowMessage(IntToStr(SizeOf(s3))); //11end; 阅读全文
posted @ 2013-07-08 23:05 万大侠 阅读(168) 评论(0) 推荐(0) 编辑
摘要: //指针的运算仅对 PChar 类型procedure TForm1.Button1Click(Sender: TObject);var p: PChar;begin p := 'China'; Inc(p); p := p + 1; ShowMessage(p); //返回:ina Dec(p); p := p - 1; ShowMessage(p); //返回:Chinaend;PChar是一个指针, 它的大小只有32位. 定义时由Delphi自动填0. 要将PChar作为字符串 使用的话必须自己分配内存用完必须自己释放. PChar型字符串由#0表示字符串结尾 Delph 阅读全文
posted @ 2013-07-08 23:02 万大侠 阅读(203) 评论(0) 推荐(0) 编辑
摘要: resourcestring 阅读全文
posted @ 2013-07-08 22:55 万大侠 阅读(195) 评论(0) 推荐(0) 编辑
摘要: uses Clipbrd;Clipboard.SetTextBuf(PChar(str)); 阅读全文
posted @ 2013-07-08 22:53 万大侠 阅读(252) 评论(0) 推荐(0) 编辑