随笔分类 -  Delphi

上一页 1 2
Delphi判断字符串中是否包含汉字，并返回汉字位置
摘要：//1，函数代码{判断字符串是否包含汉字// judgeStr：要判断的字符串//posInt：第一个汉字位置}function TForm2.IsHaveChinese(judgeStr: string; var posInt: integer): boolean;var p: PWideChar 阅读全文
posted @ 2018-05-12 21:10 覆雨翻云 阅读(1869) 评论(0) 推荐(0)
处理编译错误"0" is an invalid value for the "DebugInformation" parameter of the "DCC" task.
摘要：在安装一个从XE6复制到XE4的控件时出现编译错误： [MSBuild Error] "0" is an invalid value for the "DebugInformation" parameter of the "DCC" task. The "DebugInformation" para 阅读全文
posted @ 2018-04-18 09:43 覆雨翻云 阅读(585) 评论(0) 推荐(0)
delphi 删除字符串的回车、空格、Tab键
摘要：myStr:=StringReplace(myStr, chr(13)+chr(10), '', [rfReplaceAll]);//删除回车 myStr:=StringReplace(myStr, ' ', '', [rfReplaceAll]);//删除空格 myStr:=StringRepla 阅读全文
posted @ 2018-04-16 08:31 覆雨翻云 阅读(1049) 评论(0) 推荐(0)
cxGrid 单元格回车移到下一行，当移到最后一个单元格时回车新增一行【转】
摘要：1 在TcxGridDBTableView中,设定属性 NewItemRow.Visible = True 2 在cxgrid中输入数据怎样回车换行 在TcxGridDBTableView中 将属性OptionsBehavior.FocusFirstCellOnNewRecord = True // 阅读全文
posted @ 2018-04-14 11:52 覆雨翻云 阅读(706) 评论(0) 推荐(0)
XLSReadWriteII5使用示例
摘要：之前一直是使用XLSReadWriteII4，今天更新到XLSReadWriteII5，测试了一下，发现一些操作变化比较大，现将XLSReadWriteII5的使用示例写一下，以下是代码和生成的excel表格的效果： 转自：http://www.offeu.com/www/index_id_144. 阅读全文
posted @ 2018-03-27 13:50 覆雨翻云 阅读(6689) 评论(0) 推荐(0)
Delphi中使用OLE方法操作Excel
摘要：首先创建 Excel 对象，使用ComObj: var ExcelApp: Variant; ExcelApp := CreateOleObject( ′Excel.Application′ ); 注意程序结束时释放变量 ExcelApp:=unassigned; 1 显示当前窗口： ExcelAp 阅读全文
posted @ 2018-03-26 20:24 覆雨翻云 阅读(1171) 评论(0) 推荐(0)
在Delphi中通过OLE方式写Excel文件
摘要：报表的打印是每个项目都会遇到的问题。由于报表格式要求五花八门，往往又同时要求打印格式可方便调整。作为一种替代方法，可以将需要打印的报表导出到Excel/Word，打印交给Office去吧。由于Office的普及度较高，用户比较熟悉，也容易接受。 下面主要是在开发中涉及到的在Delphi中写Excel 阅读全文
posted @ 2018-03-26 17:22 覆雨翻云 阅读(693) 评论(0) 推荐(0)
Delphi函数的out、var等关键字的作用，和使用场景
摘要：问题描述 Delphi函数的out、var等关键字的作用，和使用场景，我知道var是作为传值调用，但是像out这个关键字又是什么作用呢？ 解决方案 在过程或函数中，out主要用于COM和CORBA技术，Delphi解释： 关键就是“它唯一的用处就是让写过程的程序员提醒一下，这个参数没有什么初始值的， 阅读全文
posted @ 2018-03-22 23:02 覆雨翻云 阅读(780) 评论(0) 推荐(0)
Delphi 判断TImage是否为空及注意事项
摘要：Delphi 判断TImage是否为空：1）非空 Image1.Picture.Graphic <> nil2）为空 Image1.Picture.Graphic = nil注意不能用Image1.Picture 来判断。Image1.Picture.Graphic即可直接赋值也可用Assign。I 阅读全文
posted @ 2017-12-19 13:40 覆雨翻云 阅读(280) 评论(0) 推荐(0)
解决："2013-01-06 00:00:00" is not a valid date and time.
摘要：在转换时间格式时，遇到以下问题： 弹出对话框："2013-01-06 00:00:00" is not a valid date and time. 在百度上查找，发现是本地日期格式设置的问题。解决方法：一是在程序中取日期格式，二是在使用程序时改变本地日期格式。 特转载一篇文章。 【转载】Delph 阅读全文
posted @ 2017-11-14 16:02 覆雨翻云 阅读(1332) 评论(0) 推荐(0)
在Delphi中获得唯一32位长字符串
摘要：function GetGUID: string; var vGUID: TGUID; vTemp:string; begin if S_OK = CreateGuid(vGUID) then begin vTemp := GUIDToString(vGUID); //去掉字符串中的{,-字符 vT 阅读全文
posted @ 2017-11-09 22:42 覆雨翻云 阅读(239) 评论(0) 推荐(0)

上一页 1 2