Luo大哥

2023年8月7日

摘要：严格的来说，tolecontainer控件并不是一个EXCEL控件，而是一个所有OLE文件的控件，可以用它打开PDF、OFFICE、TXT文件等等。而且使用OLECONTAINER控件打开的文件，文件内容依旧是一个VARIANT类型的数据。 OLECONTAINER控件在SYSTEM组下。使用O 阅读全文

posted @ 2023-08-07 17:14 Luo大哥阅读(431) 评论(0) 推荐(0) 编辑

Delphi应用EXCEL（3）使用OLEOBJECT

摘要： 1、创建EXCEL的方法首先创建 Excel 对象，使用单元ComObj : Var ExcelApp : Variant ; begin ExcelApp := CreateOleObject ( '' Excel.Application '' ) ; 使用OLEOBJECT创建的EXCEL应用阅读全文

posted @ 2023-08-07 15:48 Luo大哥阅读(521) 评论(0) 推荐(0) 编辑

delphi应用EXCEL（2）使用delphi控件

摘要： Delphi的excel控件在servers面板中，有些版本的DELPHI中未打开这些控件，但都是安装了的，手动去打开即可。在servers控件选项页面中，选择ExcelApplication、ExcelWorkbook和ExcelWorksheet这3个控件。 ExcelApplication：阅读全文

posted @ 2023-08-07 15:20 Luo大哥阅读(1288) 评论(0) 推荐(0) 编辑

DELPHI应用EXCEL（1）

摘要：在介绍使用delphi控制excel之前前，我们首先需要了解关于EXCEL的几个基本概念：EXCEL应用程序、工作薄(book)、工作表(sheet)以及单元格（CELLS）；首先，我们是打开excel应用程序，并可设置应用程序可见或不可见，可以设置应用程序标题等等；没有管理工作簿（workbo 阅读全文

posted @ 2023-08-07 15:03 Luo大哥阅读(417) 评论(0) 推荐(0) 编辑

2023年6月17日

FireDac三种方式批量添加数据的性能对比

摘要：我有个程序，需要从CSV中读入数据，对数据进行分析后，然后插入另一个sqlite数据库的数据表。在我的程序中使用了virtual string tree和Firedac，数据大约有13000条，需要转存的数据有11000条左右，转存的字段有8条，除了一条是boolean类型的外都是string类型。阅读全文

posted @ 2023-06-17 23:48 Luo大哥阅读(483) 评论(1) 推荐(0) 编辑

2023年5月31日

VST实例（14）节点数据导出

摘要： procedure TForm2.CSV1Click(Sender: TObject); begin vst.SaveToCSVFile('airports.csv',false); end; 上述代码可以把VST存为CSV文件，第二个参数为TRUE，则存储标题。但因为存为CSV文件时，源代码中有阅读全文

posted @ 2023-05-31 16:13 Luo大哥阅读(62) 评论(0) 推荐(0) 编辑

VST实例（13）存取VST

摘要： 1、树结构的存储需要进行以下三步首先，在事件“onsavenode”中写代码，存储节点信息。 property OnSaveNode: TVTSaveNodeEvent; TVTSaveNodeEvent = procedure (Sender: TBaseVirtualTree; Node: 阅读全文

posted @ 2023-05-31 11:29 Luo大哥阅读(44) 评论(0) 推荐(0) 编辑

VST实例（12）列扩展和多行显示

摘要： TreeOptions.AutoOptions如果包含了“toAutoSpanColumns” ,且下一栏为空，则本栏被缩减的文本（即文本只显示部分，后面只显示…）会自动扩展显示在下一栏中。看图示例：通常情况下，当单元格的宽度不能完全显示字符串内容时，字符串会被截取显示，截取之外的内容显示为“… 阅读全文

posted @ 2023-05-31 11:03 Luo大哥阅读(67) 评论(0) 推荐(0) 编辑

VST实例（11）排序

摘要： VST.sort和vst.sorttree可以对VST进行排序。 procedure Sort(Node: PVirtualNode; Column: TColumnIndex; Direction: TSortDirection; DoInit: Boolean = True); virtual; 阅读全文

posted @ 2023-05-31 10:59 Luo大哥阅读(59) 评论(0) 推荐(0) 编辑

VST实例（10） hint（提示）

摘要： VST也支持提示（hint）。毫无疑问，要让VST支持hint，首先肯定需要设置：SHOWHINT:=TRUE; 其次，还应该设置hintmode。 TVTHintMode = ( hmDefault, hmHint, hmHintAndDefault, hmTooltip ); hmDefaul 阅读全文

posted @ 2023-05-31 08:51 Luo大哥阅读(38) 评论(0) 推荐(0) 编辑

公告