HELP:怎样判断字符串里含有中文字符? 任何的中文字符。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var s: string; i: Integer;begin s := 'asdfd是的dfadfdf'; for i:=0 to Length(s)-1 do begin if ord(s[i]>128 then showmessage('这是中文'); end;end; 请问DelphiXE里,客户端调用DataSnap的方法时,服务端如何知道是哪个客户端? 求助 字符串列表的问题 谁来帮我写个新建N个文件夹的函数 怎样将jpg图片存为2进制文件 在delphi中使用ado如何调用oracle的存储过程(菜鸟问题,不要见笑) 如何避免onexit事件重复触发? 求和! 学delphi的一些问题? 有关ListView和DBGrid的美化的问题 在Ttoolbar下新建的Ttoolbutton的caption属性怎么显示不出来,在线等,急! 请问在添加一条纪录之后DBGrid的书签怎样定位到新增的那条纪录那里?
s: string;
i: Integer;
begin
s := 'asdfd是的dfadfdf';
for i:=0 to Length(s)-1 do
begin
if ord(s[i]>128 then
showmessage('这是中文');
end;
end;