function TrimAnsi(const S: AnsiString): Ansistring; var I, L: Integer; begin L := Length(S); I := ; while (I <= L) and (S[I] <= ' ') do Inc(I); if I > L then Result := '' else begin while S[L] <= ' ' do Dec(L); Result := Copy(S, I, L - I + );…
去掉字符串开头和结尾的空格,防止不必要的空格导致的错误. public static void main(String arg[]){ String a=" abc"; String b="abc"; System.out.println(b.equals(a)); a=a.trim();//去掉字符串中的空格 System.out.println(a.equals(b)); }…
文本是从编辑器中读取数据,有的时候,可能不需要显示格式这个时候需要去除HTML 标签,只引入其中的文本 //去掉html标签 function removeHtmlTab(tab) { return tab.replace(/<[^<>]+?>/g, '[此处HTML标签已删除]'); //删除所有HTML标签 } //去除开头结尾换行,并将连续3次以上换行转换成2次换行 function trimBr(str) { str = str.replace(/((\s| )*\r?\n…
一.正则表达式之单个字符匹配 格式:lst = re.findall(正则表达式,要匹配的字符串)预定义字符集 匹配内容 .匹配任意字符,除了换行符\n \d匹配数字 \D匹配非数字 \w匹配字母或数字或下划线     (正则函数中,支持中文的匹配) \W匹配非字母或数字或下划线 \s匹配任意的空白符 \S匹配任意非空白符 \n匹配一个换行符 \t匹配一个制表符 []匹配中括号内列举的字符   字符组格式 说明    [默认必须从字符组中选一个] |---|---| [...] 匹配字符组中的字…
FastReport调用Delphi中的人民币大写转换自定义函数   FastReport调用Delphi中的人民币大写转换自定义函数 function TJzpzEdit1.MoneyCn(mmje: Double): string; const s1: string = ‘零壹贰叁肆伍陆柒捌玖’; s2: string = ‘分角元拾佰仟万拾佰仟亿拾佰仟万’; function StrTran(const S, s1, s2: string): string; begin Result :=…
Delphi实现AnsiString与WideString的转换函数 分类: Delphi2013-01-26 16:23 460人阅读 评论(0) 收藏 举报 [delphi] view plaincopy 在Delphi下,AnsiString 和 WideString 的存储与管理各有不同,这里提供互相转换的函数一对. /// Wide String -> Ansi String function WideStringToAnsiString(const strWide: WideStri…
/**函数名:zip_space功能 :压缩空格的函数参数 : s 源字符串返回值: 0 成功**/ int zip_space(char *s){ int i,j; int len; ) { ; } len=strlen(s); i=j=; while(s[i]!='\0'){ if(s[i]!=' '){ if(i!=j){ s[j]=s[i]; } i++;j++; }else{ i++; } } while(j<i){ s[j]='\0'; j++; } ); } /**********…
excel  开头 结尾,中间  类似 SQL like 'ab%'  ,'%ab'  ,'%ab%' 在R2 单元格  查找   ab开头,ab结尾 =Search("ab",R2)=1 ab开头 , 类似 SQL like 'ab%' =Search("ab",R2)=(Len(R2)-Len("ab")+1) ab结尾 , 类似 SQL like '%ab' =Search("ab",R2)>0 ab中间 , 类似…
js  取掉空格自定义函数 //取掉左右空格: function trim(str){ return str.replace(/(^\s*)|(\s*$)/g, ""); } //取掉左边空格: function ltrim(str){ return str.replace(/(^\s*)/g,""); } //取掉右边空格: function rtrim(str){ return str.replace(/(\s*$)/g,""); } //取…
http://blog.163.com/zhangzhifeng688@126/blog/static/165262758201131211341460/ Delphi Canvas的FillRect(const Rect: TRect) 函数的作用 2011-04-12 11:34:14|  分类: Delphi|举报|字号 订阅     下载LOFTER我的照片书  |     FillRect 函数功能:该函数用指定的画刷填充矩形. 用法://Delphi自带的帮助 var  Bitmap…