//创建Excel应用对象
ExcelAPP:=CreateOleObject('Excel.Application');
//计算有数据的列总数
ExcelApp.worksheets[1].UsedRange.Rows.Count
//计算有数据的行总数
ExcelApp.WorkSheets[1].UsedRange.Columns.Count
//取excel单元格的值
ExcelApp.worksheets[1].cells[i,j].text
//退出
ExcelApp.Quit;
CreateOleObject源自ComObj
ADO:
//游标指向第一行数据
Qry.First;
//游标指向下一行数据
Qry.Next;
//标识游标是否指向最后一行下面那行
Qry.Eof;
//返回查询返回数据总条数
Qry.RecordCount
//取记录第1行的值
Qry.Fields[0].Value;
//取列名为‘name’的那一行数据的值
Qry.FieldByName('name').Value
//取表的第i列的列名
Qry.Fields[i].FieldName
cxGrid:
//在cxGrid新建一个TcxGridColumn
TcxGridTableView.CreateColumn
//删除所有Column
cxgrdtblvw1.ClearItems;
//删除cxGrid中所有记录
for I := cxgrdtblvw1.DataController.RecordCount -1 downto 0 do
begin
cxgrdtblvw1.DataController.DeleteRecord(I);
end;
//cxGrid 列宽度自适应
cxgrdtblvw1.ApplyBestFit;
//清空cxgrid
cxgrdtblvw1.DataController.RecordCount := 0;
cxTreeList:
//展开所有子项
lst1.FullExpand;
//收缩所有子项
lst1.FullCollapse;
快捷键记录
Ctrl+\ 打开ouput文件目录