字號: 小 中 大 |
推薦給好友
上一篇 |
下一篇
Delphi開發經驗技巧寶典:字符中的轉換[3]
發布: 2008-5-21 13:24 |
作者: 不詳 |
來源:
csai |
查看: 64次 | 進入領測軟件測試網論壇討論
領測軟件測試網
軟件測試技術網&vo%z'iyE'K 主要代碼如下:
軟件測試技術網*U c:Yk|Dz function TForm1.ToLower(ch: char): char;
k-M,X4qo$L begin
1b-q8U.[zF*Q(a6qK Result := Chr(Ord(ch) or $20);
軟件測試技術網}Dj$lY0g
老湿亚洲永久精品ww47香蕉图片_日韩欧美中文字幕北美法律_国产AV永久无码天堂影院_久久婷婷综合色丁香五月