看流星社区's Archiver
看流星社区
›
其它编程技术
› delphi区分汉字和字母的函数
一阵狂风
发表于 2014-6-27 08:28:13
delphi区分汉字和字母的函数
function gthz(s:string):string;
var i:integer;
begin
result:='';
for i:= 0 to Length(s) do
begin
if (Ord(s) >= 127) then
result:=result+s;
end;
end;
页:
[1]
查看完整版本:
delphi区分汉字和字母的函数