Delphi常用

//創建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文件目錄