delphi 判断 中文字符
sql正则表达：
select * from gamelog.game2_0log_100_20121012 where not objectname regexp "[\x4e00-\x9fff]"
缺点： 只能查询到完全中文（字符中不包括任何非中文）

mysql:
SELECT * FROM gamelog.game2_0log_100_20121012  where char_length(objectname)!=length(objectname)
缺点：只对 字符中 包括 中文 和外文的有用 （双字节判断）

 
delphi: 
function TForm2.IsCN(sText: string): Boolean;
var
  I: Integer;
begin
  Result := False;
  if sText = '' then Exit;
  for I := 0 to Length(sText) do
  begin
    if (Ord(sText[I]) >= $4E00{19968})  and  (Ord(sText[I]) <=  $9FA5{40869}) then
    begin
      Result := True;
      break;
    end;
  end;
end;