摘要: 内容:取出存储过程入参output的值 1、取出存储过程入参output的值 例如: SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO ALTER procedure [dbo].[SpIdSanchuanData] @PcID Int, @Actio 阅读全文
posted @ 2019-12-05 16:34 小党丶先生 阅读(117) 评论(0) 推荐(0) 编辑
摘要: 导出excel、 //导出excel procedure TForm1.btn3Click(Sender: TObject); var i: integer; excel: OleVariant; saveDialog: TSaveDialog; sFileName: string; begin t 阅读全文
posted @ 2019-12-04 13:10 小党丶先生 阅读(338) 评论(0) 推荐(0) 编辑
摘要: 1、取路径 1、取路径。 1.1 ExtractFilePath之类的返回路径。 原文链接(https://www.cnblogs.com/ZhouXiHong/archive/2007/01/30/634210.html) ExtractFileDrive :返回完整文件名中的驱动器,如"C:" 阅读全文
posted @ 2019-12-03 16:24 小党丶先生 阅读(2275) 评论(0) 推荐(0) 编辑
摘要: 每个月的第一天: sStartTime := FormatDateTime('yyyy-mm-dd',StartOfTheMonth(Now));每个月的最后一天 sEndTime := FormatDateTime('yyyy-mm-dd',EndOfTheMonth(Now)); AssignF 阅读全文
posted @ 2019-12-03 16:08 小党丶先生 阅读(606) 评论(0) 推荐(0) 编辑
摘要: 不是原创,只是复制了重要的内容作为笔记,如有侵权请联系我,马上删除。 原文链接:https://www.cnblogs.com/zyx110/p/10802098.html 一、创建项目 阅读全文
posted @ 2019-11-22 11:23 小党丶先生 阅读(173) 评论(0) 推荐(0) 编辑
摘要: https://www.cnblogs.com/selene/p/4658554.html 阅读全文
posted @ 2019-11-21 14:19 小党丶先生 阅读(128) 评论(0) 推荐(0) 编辑
摘要: 不是原创,只是复制保存下来,用于学习,如有侵权请联系我,马上删除。 原文链接:https://www.cnblogs.com/zs-note/articles/5050737.html Application.MessageBox是TApplication的成员函数,声明如下:functionTAp 阅读全文
posted @ 2019-11-08 14:37 小党丶先生 阅读(294) 评论(0) 推荐(0) 编辑
摘要: 不是原创,原文链接: https://blog.csdn.net/u014028956/article/details/46810537 1、首先要声明一个类型; type TProc = procedure(str:string) of object; //这里的of object 一定要,不然会 阅读全文
posted @ 2019-11-08 10:32 小党丶先生 阅读(481) 评论(0) 推荐(0) 编辑
摘要: 1.TADODataSet.RecordCount 报错 问题描述: delphi 连接dbf, 在TADODataSet.RecordCount 报错:" 数据提供程序或其他服务返回 E_FAIL 状态"。 解决办法:添加一行 qryDataSet.CursorLocation := clUseS 阅读全文
posted @ 2019-11-08 10:10 小党丶先生 阅读(258) 评论(0) 推荐(0) 编辑
摘要: wewrwe 阅读全文
posted @ 2019-11-08 09:58 小党丶先生 阅读(102) 评论(0) 推荐(0) 编辑