摘要： use msxml Delphi 6 里idhttp貌似没有Header里的一些东西的处理方法。也是摸索了很久，记录一下。 function HttpRequest(http: TIdHttp; strUrl: string; inStr: string; var outStr, Errmsg: s 阅读全文

摘要： cxGrid失去焦点后如何继续保持选中单元的高亮状态： 在界面在放一个TcxStyleRepository控件，在控件中添加一个TcxStyle样式，设置Color为clHightlight，TextColor 设置为（255，255，255）白色； 将TcxGridDBTableView的Styl 阅读全文

摘要： 1、先看下想要的结果、 { "patInfo": { "Age": "23", "姓名": "黄晓明" }, "audvaj": [{ "序号": "1", "名称": "[甲]小换药" }, { "序号": "2", "名称": "5%葡萄糖注射液(国)" }] } 2、看下组织代码 with d 阅读全文

摘要： select * from T_A a (nolock) where a.xh not in (select xh from T_B) 方法1：效果甚微 select * from T_A a (nolock) where not exists (select xh from T_B where x 阅读全文

摘要： --列转行小实例 --创建测试表 if object_id(N'test', N'U') is not null drop table test go with UnPivotTable as ( select 1 as UserNO, '33' as A, '44' AS B, '55' as C 阅读全文

摘要： with t as ( select '-' as col1 --isnumeric('-')这里会判断为数字，所以不能用 union all select '1' as col1 union all select '2' as col1 union all select '3.4' as col1 阅读全文

摘要： --行转列小实例 --创建测试表 if object_id(N'test', N'U') is not null drop table test go with PivotTable as ( select 'xxx' as czy, '点赞' as czlx, 2 as num union all 阅读全文

摘要： 界面代码： object Form1: TForm1 Left = 252 Top = 190 Width = 1149 Height = 549 Caption = 'Form1' Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color 阅读全文

摘要： 首先提供两个XML文件 XML代码如下： 1、Example.xml <?xml version="1.0" encoding="ISO-8859-1"?> <chart> <series title="Series1" type="Point" color="#FF0000"> <points c 阅读全文

摘要： 界面代码： object Form1: TForm1 Left = 568 Top = 393 Width = 725 Height = 408 Caption = '对象观察器' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color 阅读全文