delphi  简单的删除字符串尾部数字的代码 方式一: function FilterShowName(const sName: String): String; var I: Integer; begin Result := sName; if Result <> '' then begin do begin ', '-'] then Delete(Result, I, ) else Break; end; end; end; 方式二(未测试): function GetChinese(S

有些财务业务场景是需要把数字多余的0去掉的. 可以这么写 private String getRealData(BigDecimal num) { if (num == null) { return "0"; } String value = num.stripTrailingZeros().toString(); return value; } 也可以这么写 private String getRealData(BigDecimal num) { if (num == null) {

滑动输入数字 NumberBox控件 HorzIncrement:划动自动增加输入值的步长 combobox控件 http://docwiki.embarcadero.com/RADStudio/Berlin/en/Using_Pickers_to_Provide_Platform-Specific_Behavior_and_View_of_Selection_Controls http://docwiki.embarcadero.com/Libraries/Berlin/en/FMX.List

    使用API函数:声明 FUNCTION ulong ShowScrollBar(ulong hwnd,ulong wBar,ulong bShow) LIBRARY "user32.dll"调用constant long SB_HORZ = 0constant long SB_VERT = 1constant long SB_BOTH = 3ShowScrollBar(Handle(TreeView1),SB_HORZ,0);//隐藏水平滚动条 ShowScrollBar(Ha

1.向下取整 var num1 = 12.10345; var num2 =12.9801; var newnum1=Math.floor(num1)     //结果 12 var newnum2=Math.floor(num2)     //结果 12 注:Math.floor()不进行四舍五入,直接舍去小数部分 2.向上取整 var num1 = 12.10345; var num2 =12.9801; var num3=12: var num4=12.0: var newnum1=Mat

一.去掉窗口最大化,最小化.关闭 borderIcons:biSystemMenu:false borderStyle:bsSizeable 二.主子窗口 主main: //调用子窗体procedure TFrmMain.CallChildForm(FormChild: TFormClass; var Reference);var i: Integer;begin if MDIChildCount >0 then for i := 0 to MDIChildCount-1 do if MDICh

从网上找的一段代码 /// <summary> /// 小写转大写 /// </summary> /// <param name="mmje"></param> /// <returns></returns> function MoneyConvert(mmje: real): string; const s1: string = '零壹贰叁肆伍陆柒捌玖'; s2: string = '分角元拾佰仟万拾佰仟亿拾佰仟

1.copy(a,b,c) 举个例子: str := “123456”;str1 := Copy(Str,2,3);结果就是 str1 等于 234.Copy有3个参数,第一个是你要处理的字符串,第二个是你要截取的开始位置,第3个是截取位数.当你的第3个参数大于字符长度,那么效果就是取 开始位置 后的所有字符.str1 := Copy(Str,2,10); 结果就是str1 等于 23456. 2.pos(a,b); 取出子串a,在父串b中第一次出现的位置: 例如: pos(‘b’,‘abcd’

以下是在之前的公司与别人共同参与制定的Delphi开发规范(5年前了,那时用的还是Delphi7,部分规则可能有些过时,但不整理了,觉得有用的人,自己整理成适合自己的开发规范吧), 目    录一.序言 二.通用源代码格式规则2.1 缩格2.2 页边空格 2.3 Begin…End 配对 2.4代码文件中通用符号含义 2.5注释写法 三.Object Pascal 3.1 括号3.2 保留字和关键字 3.3 过程和函数(例程)3.3.1 命名/格式化/声明 3.3.2 形式参数 3.3.2.1

/* * 数字金额转换成中文大写金额的函数 * String Int $num 要转换的小写数字或小写字符串 * return 大写数字 */ function num_to_rmb($num){ $c1 = "零壹贰叁肆伍陆柒捌玖"; $c2 = "分角元拾佰仟万拾佰仟亿"; //精确到分后面就不要了,所以只留两个小数位 $num = round($num, ); //将数字转化为整数 $num = $num * ; ) { return "金额太大,请

php把阿拉伯数字转为银行数字大写 前言:之前在做一个外贸公司的询报价系统时用到了记录关于金额的数据,一般阿拉伯数字都需要转为银行使用的大写数字,在这简单记录一下 /* * 数字金额转换成中文大写金额的函数 * String Int $num 要转换的小写数字或小写字符串 * return 大写数字 */ public function num_to_rmb($num){ $c1 = "零壹贰叁肆伍陆柒捌玖"; $c2 = "分角元拾佰仟万拾佰仟亿"; //精确到分

Sql中想把小数点后多余的0去掉,怎么办? select 5000/10000.0 --想变成0.5select 5500/10000.0 --想变成0.55select 5550/10000.0 --想变成0.555select 5555/10000.0 --想变成0.5555 其结果分别为:0.5000000    0.5500000  0.5550000   0.5555000 一.如果想去掉数字5后面多余的0 ,需要转化一下: select CONVERT(FLOAT,5000/1000

/** *数字金额转换成中文大写金额的函数 *String Int $num 要转换的小写数字或小写字符串 *return 大写字母 *小数位为两位 **/ function num_to_rmb($num){ $c1 = "零壹贰叁肆伍陆柒捌玖"; $c2 = "分角元拾佰仟万拾佰仟亿"; //精确到分后面就不要了,所以只留两个小数位 $num = round($num, 2); //将数字转化为整数 $num = $num * 100; if (strlen($

PHP把阿拉伯数字转换成中文,需要定义一个转换的算法: <?php /将数字转换为汉字,比如1210转换为一千二百一十 $num = "842105580";//九位数 function del0($num) //去掉数字段前面的0 { return "".intval($num); } function n2c($x) //单个数字变汉字 { $arr_n = array("零","一","二",&

iOS开发过程中,总有那么一些个小问题让人纠结,它们不会让程序崩溃,但是会让人崩溃.除此之外,还将分享一些细节现在我通过自己的总结以及从其他地方的引用,来总结一下一些常见小问题. 本篇长期更新,多积累,多奉献,同时感谢其中一些文章的作者的整理,感谢! iOS高级开发实战讲解 这是我在网上搜索到的iOS高级开发实战讲解,由于原文不是很方便浏览,所以我在这里整理一部分出来,方便查阅,同时谢谢原作者. 这里我不是每一个都收录进来,这里只是放出一部分,有些用的太多,我就没整理了,大家如果想看可以去看原文

一.让微信内置浏览器(x5)支持 flex .item-flex { display: -webkit-box; -webkit-box-pack: center; -webkit-box-align: center; display: flex; justify-content: center; align-items: center; } 二.去掉输入框默认的边框 input, textarea { outline: none; } 三.去掉数字输入框里默认的按钮 input[type=nu

织梦5.7 TAG.标题.栏目以及keywords长度字符数限制修改[图文]   标签: 织梦关键词长度修改 织梦tag长度修改 织梦标题长度修改 织梦栏目长度限制修改 织梦修改 分类: 技术操作   织梦在很多如 TAG.标题.栏目以及keywords长度字符数方面默认是有限制的,但是我们在对网站进行操作的时候往往触及它的默认限制导致更改不完整等等..对于此我们可以进入数据库修改相应字段以及ftp修改相应源码来解决   一.织梦DEDECMS tag长度修改  1.修改数据库  进入数据库修改

会用到的语法 正则字符 释义 举例 + 前面元素至少出现一次 ab+:ab.abbbb 等 * 前面元素出现0次或多次 ab*:a.ab.abb 等 ? 匹配前面的一次或0次 Ab?: A.Ab 等 ^ 作为开始标记 ^a:abc.aaaaaa等 $ 作为结束标记 c$:abc.cccc 等 \d 数字 3.4.9 等 \D 非数字 A.a.- 等 [a-z] A到z之间的任意字母 a.p.m 等 [0-9] 0到9之间的任意数字 0.2.9 等 注意: 1. 转义字符 >>> s '(

函数 描述@UserName 返回用户名或服务器名.@Name([key]; name) 更改用户名的格式.关键字包含 [CN] 以从一个专有名字中解析出公共名,[Abbreviate] 缩写规范格式的专有名字,[Canonicalize] 与上述作用相反,[ToKeyword] 将名字各部分按相反顺序排序,用反斜杠分开(用于分类视图).@UserRoles 对于服务器上的数据库,返回当前用户的角色列表.@MailDbName 返回用户邮件数据库的服务器名和路径名.该 @function 计算出

一.方法 ---------------------Array 对象------------------------ 1.concat() : 将作为参数传递的元素拼接到一个已存在的数组2.pop()    : 删除数组中的最后一个元素3.push()   : 在数组末尾添加新元素,从而增加数组的长度4.shift()  : 移除的第一个元素并返回被移除的值5.unshift(): 向数组头部添加元素6.slice()  : 将数组的元素复制到另一个数组中7.splice() : 将从数组的某一

内容概要:C语言控制语句题库.doc 第三章 控制语句 一.选择题 1. 以下语句中无限循环语句是[B]. A)for(;2&5;); B)while(1,2,3); -> while(3) C)while('\0'); D)for(;'\0';); 解析过程: A选项: 010 101 B选项: While(3); C,D选项: '0' '\0' 0 %d:48 0 0 %c:0 NUT NUT(不可见字符) 2. 若有程序段如下: a=b=c=0;x=35; if(!a)x--; if(