- 博客(13)
- 收藏
- 关注
RSS订阅原创 delphi JSON 数字0.00没有引号解析问题
原因是superObject 的版本问题：网址：https://www.haolizi.net/example/key_superobject_1.html
2021-06-01 17:52:04
380
转载 Delphi 人民币大小写转换
Delphi 人民币大小写转换时间:2011-5-24来源:yang作者:peng点击:745次function TPrintfrm.NumToChar(n: Real): wideString; //可以到万亿,并可随便扩大constcNum: WideString = ‘零壹贰叁肆伍陆柒捌玖-万仟佰拾亿仟佰拾万仟佰拾元角分‘; cCha: array[0..1, ...
2019-05-29 11:53:21
601
转载 cxGrid 过滤 Filter
cxgrid过滤条件清除：cxgrdbtblvwGrid1DBTableView2.DataController.Filter.AutoDataSetFilter:=True;cxgrdbtblvwGrid1DBTableView2.DataController.Filter.Clear;cxgrid过滤条件添加：cxg...
2019-05-09 15:47:20
1763
原创 Sql_Server中如何判断表中某字段是否存在
IF COL_LENGTH('A', 'C') IS NOT NULLPRINT N'存在'ELSEPRINT N'不存在'
2019-05-09 15:39:57
2750
原创 Delphi 导出Excel 出现科学计数
ExcelWorkSheet1.cells.item[nowhangi, ii] := fields[i].Text +#9 ; //将数字 变成 字符串ExcelWorkSheet1.cells.item[nowhangi, ii].HorizontalAlignment := xlCenter; //文本居中
2018-07-17 15:41:35
1388
原创 Delphi
用#引导一个整数，整数表示该字符的ASCII码。例如，#13、#$20、#$30、#65分别表示回车符、空格符、数字符号'0'、字母'A'。
2018-06-22 18:22:22
150
转载 SQLserver 存储过程
exec sp_databases; --查看数据库exec sp_tables; --查看表exec sp_columns #表名; --查看列exec sp_helpIndex #表名; --查看索引exec sp_helpConstraint student; --约束ex...
2018-06-08 16:04:01
161
转载 SQLServer 事务
第一种：BEGIN TRAN --SQL 语句 ;update,delete,insert UPDATE ZD_KSFL_TEST SET CYZXKS='ABC' WHERE KSBH=1234; DELETE ZD_KSFL_TEST WHERE KSBH=1234; IF @@ERROR =0 COMMIT TRAN; ELSE ROLLBACK TRAN;第二种：（使用 try-ca...
2018-06-05 15:19:04
196
转载 SQLServer 公用变量
SELECT @@FETCH_STATUS --返回上一次fetch 语句的状态值，用在游标中；=0 代表没有错误SELECT @@ERROR --返回最后执行的Tran SQL语句的错误代码 ；<>0 代表有错误SELECT @@TRANCOUNT --返回当前连接的活动事务数SELECT @@IDENTITY --返回最后插入的标识值SELECT ...
2018-06-05 10:58:30
437
转载 SQLServer 查询
1.嵌套查询：将一个查询块嵌套在另一个查询块的where子句或having短语的条件中的查询成为嵌套查询； （子查询的select语句中不能使用order；order by子句只能对最终查询结果排序。）例子：1 --查询成绩高于学号为“109”、课程号为“3-105”的成绩的所有记录。2 select * from SCORE where DEGREE &...
2018-05-16 15:33:06
182
转载 SqlServer 事务
BEGIN TRAN-- 做某些操作，例如Insert into …if @@error <> 0BEGINROLLBACK TRANENDelseBEGINCOMMIT TRANEND
2018-05-16 15:13:19
492
转载 SQLServer 使用游标、
（在存储过程中用select语句取出每一条数据进行操作，需要用到游标）declare @SZM VARCHAR(20) ,@LXMC VARCHAR(20)--申明一个游标declare A_CURSOR CURSOR FOR --A_CURSOR 是游标的名字select SZM,LXMC from CL_LX --查询列szm，列lxmc 从表cl_lx中--打开游标open ...
2018-05-16 15:06:21
191
转载 SqlServer 变量类型转换
类型转换函数：cast(值 as 要变成的类型) ; convert(要变成的类型，值);select cast('123' as int); --123select convert(int,'123'); --123select cast('123.4' as int); --123 这种写法会报错select convert(int , '123.4'); --123 这种写法...
2018-05-16 11:35:29
3026
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人