aroc_lo
码龄15年
  • 790,919
    被访问
  • 182
    原创
  • 13,063
    排名
  • 102
    粉丝
关注
提问 私信
  • 加入CSDN时间: 2007-05-13
博客简介:

编程资料收集与共享交流

查看详细资料
  • 1
    领奖
    总分 86 当月 1
个人成就
  • 获得22次点赞
  • 内容获得75次评论
  • 获得129次收藏
创作历程
  • 1篇
    2022年
  • 9篇
    2021年
  • 3篇
    2020年
  • 11篇
    2019年
  • 3篇
    2018年
  • 2篇
    2017年
  • 3篇
    2016年
  • 4篇
    2015年
  • 17篇
    2014年
  • 52篇
    2013年
  • 7篇
    2012年
  • 20篇
    2011年
  • 78篇
    2010年
  • 193篇
    2009年
  • 151篇
    2008年
成就勋章
TA的专栏
  • UniGui
    3篇
  • ACCESS
    11篇
  • C# | ASP.NET
    3篇
  • DELPHI组件技术
    21篇
  • DELPHI编程
    375篇
  • DLL OR BPL
    7篇
  • EhLib的使用
    10篇
  • IntraWeb
    2篇
  • MSSQL
    75篇
  • RemObject
    7篇
  • SQLite
    4篇
  • 三层/多层结构
    36篇
  • 其它
    31篇
  • 加密与解密
    14篇
  • 开发工具新闻与评论
    12篇
  • 报表
    3篇
  • 数据库类
    86篇
  • 电脑技术
    14篇
  • 编程技术
    151篇
  • 网络类
    26篇
  • DataSnap
    7篇
  • 皮肤
    5篇
  • MySQL
    1篇
兴趣领域 设置
  • 数据库管理
    数据库开发
  • 最近
  • 文章
  • 资源
  • 问答
  • 帖子
  • 视频
  • 课程
  • 关注/订阅/互动
  • 收藏
搜TA的内容
搜索 取消

ADOConnection 打开EXCEL

'Provider=Microsoft.Jet.OLEDB.4.0;' + 'Data Source=' + Edt_ExcelFilePath.Text + ';' + 'Extended Properties=Excel 8.0;';
原创
发布博客 2022.01.20 ·
497 阅读 ·
0 点赞 ·
0 评论

Raize Components 7.0 FS D11.0.7z

发布资源 2021.10.18 ·
7z

FastReport 合并2份报表一同打印

frxReport1.LoadFromFile('1.fr3');frxReport1.PrepareReport;frxReport1.LoadFromFile('2.fr3');frxReport1.PrepareReport(False);frxReport1.ShowPreparedReport;
原创
发布博客 2021.08.08 ·
105 阅读 ·
0 点赞 ·
0 评论

MSSQL FLOAT 的问题挺郁闷的

图中的 905 * 0.815 正常的计算结果为 737.575 ,四舍五入保留两位小数就应该是:737.58但是呢,如:jjjjj2 所显示竟然是:737.57 。其实真实的计算结果如:jjjj1所示:737.574999999。四舍五入保留两位小数自然就是不是预期应该的数了;这个名字,就是 float 的精度差的问题。将其转换为精度较好的类型后果再取四舍五入就好了。...
原创
发布博客 2021.07.09 ·
61 阅读 ·
0 点赞 ·
0 评论

SQL 获取月份的天数

SELECT 32-DAY(getdate()+32-DAY(getdate()))
原创
发布博客 2021.06.16 ·
234 阅读 ·
0 点赞 ·
0 评论

取字符串中第一个数字 与 最后一个数字的位置

DECLARE @str NVARCHAR(255) = 'YX807.起8款小折盒各入1个配件(其中7仔入3种),起大折盒,放8个小折盒入盒放板。'SELECT PATINDEX('%[0-9]%', @str) AS 第一个数字位置 , LEN(@str) - PATINDEX('%[0-9]%', REVERSE(@str)) + 1 AS 最后一个数字位置...
原创
发布博客 2021.06.11 ·
220 阅读 ·
0 点赞 ·
1 评论

PIVOT 与 UNPIVOT 的纵横互转

在 MSSQL2008R2 上测试,其它版本未知
原创
发布博客 2021.05.31 ·
25 阅读 ·
0 点赞 ·
0 评论

CrossVcl 1.53.7z

发布资源 2021.05.28 ·
7z

InpubQuery的高级用法

procedure ShowErrorMsg(Amsg:string);begin Application.MessageBox(PChar(Amsg), 'error', MB_OK); abort;end;procedure TFrm_Main.Btn_1Click(Sender: TObject);var ss:array of string;begin SetLength(ss,3); if InputQuery('密码修改',[Chr(0)+'旧 密 码',Chr.
原创
发布博客 2021.04.30 ·
83 阅读 ·
0 点赞 ·
1 评论

unigui 通过点击按钮打开一个新的网页

不能用 ShellExecute要用:unisession.addjs('window.open("http://www.163.com","newwindow")')
原创
发布博客 2021.04.27 ·
168 阅读 ·
0 点赞 ·
0 评论

去掉 unigui 服务器端的 UniGUI Server 字样

uses uniGUIServerFormprocedure TUniServerModule.UniGUIServerModuleCreate(Sender: TObject);begin uniGUIServerForm.ServerForm.Caption :='测试一下效果,哈哈哈。';end;
原创
发布博客 2021.03.23 ·
211 阅读 ·
0 点赞 ·
0 评论

FDQuery 不能通过TRY...except 捕获错误的解决方法

procedure TDM_SYS.PubP_BatchSaveStdData(MastTbl: TFDQuery);var n:Integer;begin try if MastTbl.State in [dsedit,dsinsert] then MastTbl.Post; MastTbl.ApplyUpdates(0); //通过DEBUG,可以定位错在这里 except on e:Exception do begin ShowErrorMsg...
原创
发布博客 2021.01.11 ·
154 阅读 ·
0 点赞 ·
0 评论

unigui 验证码生成

转载自:https://blog.csdn.net/tvmerp/article/details/107736457//验证码生成单元unit AuthenticodeGenerate;interfaceuses SysUtils, Windows, ExtCtrls, Graphics;function GenerateAuthenticode(const Img: TImage; const Len: Integer = 4): string;implementati.
转载
发布博客 2020.08.21 ·
143 阅读 ·
0 点赞 ·
0 评论

FastReport V6.4.8_ByJoe.7z

发布资源 2020.06.24 ·
7z

使用CleintDataset 蜂巢式主从结构,修改主表KEY字段出现 Cascaded updates not enabled

在provider的option属性中将 opCascadeDeletes 与 opCascadeUpdates 设置为 True 即可。
原创
发布博客 2020.06.04 ·
117 阅读 ·
0 点赞 ·
0 评论

FlyTreeViewPro.Suite.7z

发布资源 2020.06.02 ·
7z

控件开发基础.rar

发布资源 2020.06.02 ·
rar

FireDAC 连接SQL Server需要注意的

TFDConnection:FetchOptions.Mode 设置为fmAll, 返回全部结果, 否则默认只返回前50条, 效果与open以后再执行FetchAll一样ResourceOptions.SilentMode 设置为True, 就不需要FDGUIxWaitCursor之类的东西了, 同样也不再会自动改变鼠标样式, 默认是需要的TFDQuery:Resour...
转载
发布博客 2020.04.17 ·
276 阅读 ·
0 点赞 ·
0 评论

delphi bpl插件系统开发

一个插件系统需要什么?一个最小的插件系统当然需要插件本身,调用插件的容器,最后需要契约.契约是什么呢?契约就是两个对象相互沟通的一个标准,这个标准应该统一,这样容器才能和不同的插件通讯.我们可以使用接口来表述这个契约.例如type IPlugin =interface['{48BF4000-B028-4B57-9955-B1A8305DA39...
转载
发布博客 2019.12.14 ·
296 阅读 ·
0 点赞 ·
0 评论

Method pointer and regular procedure

This is the difference between a "procedure" and a "procedure of object"TheOnClickis defined as aTNotifyEvent:type TNotifyEvent = procedure(Sender: TObject) of object;You cannot assign a pro...
转载
发布博客 2019.12.07 ·
318 阅读 ·
0 点赞 ·
0 评论
加载更多