同時更新DB方法

//******************************************************************************
//* InitADOQueryUpdateBatch: 設定UpdateBatch專用的TADOQuery物件                *
//*                    (例如轉換資料表格式)所需要的參數                        *
//* 1. UpdateBatch方法要怎麼用?                                                *
//* 答﹕啟用UpdateBatch功能的前提條件﹕                                        *
//*     使用ADO之BatchUpdate功能之前提條件                                     *
//*     CursorType屬性值需為﹕ctKeySet 或 ctStatic                             *
//*     a. LockType屬性值需為﹕LtBatchUpdate                                   *
//*     b. 執行的SQL敘述需為﹕Select 敘述                                      *
//*     c. CursorLocation屬性值需為﹕clUseClient                               *
//*     當CursorLocation屬性值為clUseServer時也可使用BatchUpdate功能﹐         *
//*     只是說其缺點是無法使用ADO的Briefcase模型功能﹐且在執行效率上不佳﹒     *
//*                                                                            *
//* 2. 完成如上的設定就已經自動開啟UpdateBatch功能了﹐                         *
//*    在對資料庫進行異動時（如Post, Insert, Delete）﹐                        *
//*    並非對后端的資料庫來源﹐而是針對前端的快取記憶體中的資料而言﹐          *
//*    因為Batchupdate功能已將后端資料庫中的資料抓取到前端的快取記憶體中了﹐   *
//*    回存后端資料庫時請參考第3點                                             *
//*                                                                            *
//* 3. 在使用BATCHUPDATE時該怎麼做才會將資料寫到資料庫呢?                      *
//*   3-1 當需要把快取記憶體中所有的異動回存到后端資料庫來源﹕                 *
//*   begin                                                                    *
//*     ADODataSet1.UpdateBatch;                                               *
//*   end;                                                                     *
//*                                                                            *
//*   3-2 當需要把快取記憶體中所有的異動取消﹐                                 *
//*       即放棄之前在快取記憶體中的異動﹐不回存到后端資料庫﹕                 *
//*   begin                                                                    *
//*     ADODataSet1.CancelBatch;                                               *
//*   end;                                                                     *
//******************************************************************************
procedure TRecUIControl.InitADOQueryUpdateBatch(ADOQueryUB: TADOQuery);
begin
  // 設定ADOQueryUB物件所需參數
  with ADOQueryUB do
  begin
    CommandTimeout := 1200;
    Connection     := m_ADOConnectionBT;       //
    CursorLocation := clUseClient;             // Connection is client-side
    CursorType     := ctStatic ;              // Only ctStatic is supported if the CursorLocation property is set to clUseClient
    LockType       := ltBatchOptimistic;       // For batch update mode rather than immediate update mode
    SQL.Clear;
  end;
end;
////////////
  bUpdateOK := True;
  ADOQuery1.Connection.BeginTrans; // 使用交易機制，確保更新無誤
  for i:=0 to TreeMember.Items.Count-1 do
  begin
    sUserID:=TreeMember.Items[i].ColumnText[1];
    sSQL:=     'UPDATE usertable SET appliedsetting=' + IntToStr(APPLY_ONE_GROUP) +' WHERE userid=' + sUserID +';';
    sSQL:=sSQL+'UPDATE grouptouser SET selected=0 WHERE userid=' + sUserID +';';
    sSQL:=sSQL+'UPDATE grouptouser SET selected=1 WHERE userid=' + sUserID +' AND groupid=' + m_sID+';';
    if not SQLExecuteOK(ADOQuery1,sSQL) then
    begin
      bUpdateOK := False;
      Break;
    end;
  end;
  if not bUpdateOK then
  begin
    ADOQuery1.Connection.RollbackTrans; // 發生問題時，回復交易內容
    Exit;
  end
  else
    ADOQuery1.Connection.CommitTrans;  // 若更新無誤，送出交易內容

cxgrid過濾器變成中文字串

uses cxClasses, cxFilterControlStrs, cxGridStrs, cxFilterConsts;

procedure SetCxGridFilterDialogString();
begin

  //cxFilterBoolOperator
  //cxSetResourceString(@cxSFilterBoolOperatorAnd,'AND');
  //cxSetResourceString(@cxSFilterBoolOperatorOr, 'OR');
  //cxSetResourceString(@cxSFilterBoolOperatorNotAnd, 'NOT AND');
  //cxSetResourceString(@cxSFilterBoolOperatorNotOr, 'NOT OR');
  cxSetResourceString(@cxSFilterRootButtonCaption       ,'過濾器');//'Filter' '過濾器'
  cxSetResourceString(@cxSFilterAddCondition            ,'新增條件(&C)');//'Add &Condition' '新增條件(&C)'
  cxSetResourceString(@cxSFilterAddGroup                ,'新增條件群組(&G)');//'Add &Group' '新增條件群組(&G)'
  cxSetResourceString(@cxSFilterRemoveRow               ,'移除列(&R)');//'&Remove Row' '移除列(&R)'
  cxSetResourceString(@cxSFilterClearAll                ,'清除全部(&A)');//'Clear &All' '清除全部(&A)'
  cxSetResourceString(@cxSFilterFooterAddCondition      ,'新增條件');//'press the button to add a new condition' '新增條件'
  cxSetResourceString(@cxSFilterGroupCaption            ,''          );//'applies to the following conditions'
  cxSetResourceString(@cxSFilterRootGroupCaption        ,''          );//''
  cxSetResourceString(@cxSFilterControlNullString       ,'<空值>');//'' '<空值>'
  cxSetResourceString(@cxSFilterErrorBuilding           ,'無法建立過濾條件');//'Can''t build filter from source' '無法建立過濾條件'

  //FilterDialog
  cxSetResourceString(@cxSFilterDialogCaption                   ,'進階查詢-自訂過濾條件');//'Custom Filter' '進階查詢-自訂過濾條件'
  cxSetResourceString(@cxSFilterDialogInvalidValue              ,'設定值不合法');//'Invalid value' '設定值不合法'
  cxSetResourceString(@cxSFilterDialogUse                       ,'可使用');//'Use' '可使用'
  cxSetResourceString(@cxSFilterDialogSingleCharacter           ,'代表任何單一字元');//'to represent any single character' '代表任何單一字元'
  cxSetResourceString(@cxSFilterDialogCharactersSeries          ,'代表任何連續字串');//'to represent any series of characters' '代表任何連續字串'
  //cxSetResourceString(@cxSFilterDialogOperationAnd, 'AND');
  //cxSetResourceString(@cxSFilterDialogOperationOr, 'OR');
  cxSetResourceString(@cxSFilterDialogRows                      ,'請輸入過濾條件');//'Show rows where:' '請輸入過濾條件'

  // FilterControlDialog
  cxSetResourceString(@cxSFilterControlDialogCaption            ,'進階查詢-過濾編輯器');//'Filter builder'  '進階查詢-過濾編輯器'
  cxSetResourceString(@cxSFilterControlDialogNewFile            ,'未命名.flt');//'untitled.flt  '未命名.flt'
  cxSetResourceString(@cxSFilterControlDialogOpenDialogCaption  ,'開啟已存在的過濾條件');//'Open an existing filter' '開啟已存在的過濾條件'
  cxSetResourceString(@cxSFilterControlDialogSaveDialogCaption  ,'儲存過濾條件至檔案');//'Save the active filter to file' '儲存過濾條件至檔案'
  cxSetResourceString(@cxSFilterControlDialogActionSaveCaption  ,'另存新檔...');//'Save As...' '另存新檔...'
  cxSetResourceString(@cxSFilterControlDialogActionOpenCaption  ,'開啟...');//'Open...'  '開啟...'
  cxSetResourceString(@cxSFilterControlDialogActionApplyCaption ,'套用');//'Apply' '套用'
  cxSetResourceString(@cxSFilterControlDialogActionOkCaption    ,'確定');//'OK'  '確定'
  cxSetResourceString(@cxSFilterControlDialogActionCancelCaption,'取消'); //'Cancel' '取消'
  //cxSetResourceString(@cxSFilterControlDialogFileExt, 'flt');
  //cxSetResourceString(@cxSFilterControlDialogFileFilter, 'Filters (*.flt)|*.flt');


  //cxGrid主視窗類
  //cxSetResourceString(@scxGridRecursiveLevels ,'');// 'You cannot create recursive levels');
  //cxSetResourceString(@scxGridDeletingConfirmationCaption ,'');// 'Confirm');
  //cxSetResourceString(@scxGridDeletingFocusedConfirmationText ,'');// 'Delete record?');
  //cxSetResourceString(@scxGridDeletingSelectedConfirmationText ,'');// 'Delete all selected records?');
  cxSetResourceString(@scxGridNoDataInfoText                      ,'<無資料顯示>');// ''); '<無資料顯示>'
  //cxSetResourceString(@scxGridNewItemRowInfoText ,'');// 'Click here to add a new row');
  //cxSetResourceString(@scxGridFilterIsEmpty ,'');// '');
  cxSetResourceString(@scxGridCustomizationFormCaption            ,'自訂');// 'Customization'); '自訂'
  cxSetResourceString(@scxGridCustomizationFormColumnsPageCaption ,'隱藏欄位');// 'Columns'); '隱藏欄位'
  cxSetResourceString(@scxGridGroupByBoxCaption                   ,'(請拖曳欄位標題至此作為分組檢視依據)');// 'Please Drag a column header here to group by that column'
  cxSetResourceString(@scxGridFilterCustomizeButtonCaption        ,'進階查詢-過濾編輯器'+'...');//'Customize...'  '進階查詢-過濾編輯器'    //原本為373 '自訂過濾條件...'
  //cxSetResourceString(@scxGridColumnsQuickCustomizationHint ,'');// 'Click here to select visible columns');
  cxSetResourceString(@scxGridCustomizationFormBandsPageCaption   ,'類別');// 'Bands');  '類別'
  //cxSetResourceString(@scxGridBandsQuickCustomizationHint ,'');// 'Click here to select visible bands');
  //cxSetResourceString(@scxGridCustomizationFormRowsPageCaption ,'');// 'Rows');
  //cxSetResourceString(@scxGridConverterIntermediaryMissing ,'');// 'Missing an intermediary component!'#13#10'Please add a %s component to the form.');
  //cxSetResourceString(@scxGridConverterNotExistGrid ,'');// 'cxGrid does not exist');
  //cxSetResourceString(@scxGridConverterNotExistComponent ,'');// 'Component does not exist');
  //cxSetResourceString(@scxImportErrorCaption ,'');// 'Import error');
  //cxSetResourceString(@scxNotExistGridView ,'');// 'Grid view does not exist');
  //cxSetResourceString(@scxNotExistGridLevel ,'');// 'Active grid level does not exist');
  //cxSetResourceString(@scxCantCreateExportOutputFile ,'');// 'Can''t create the export output file');
  //cxSetResourceString(@cxSEditRepositoryExtLookupComboBoxItem ,'');// 'ExtLookupComboBox|Represents an ultra-advanced lookup using the QuantumGrid as its drop down control');

  //cxGrid主視窗的Filter類
  cxSetResourceString(@cxSFilterOperatorEqual ,'=');// 'equals';
  cxSetResourceString(@cxSFilterOperatorNotEqual ,'!=');// 'does not equal';
  cxSetResourceString(@cxSFilterOperatorLess ,'<');// 'is less than';
  cxSetResourceString(@cxSFilterOperatorLessEqual ,'<=');// 'is less than or equal to';
  cxSetResourceString(@cxSFilterOperatorGreater ,'>');// 'is greater than';
  cxSetResourceString(@cxSFilterOperatorGreaterEqual ,'>=');// 'is greater than or equal to';
  //cxSetResourceString(@cxSFilterOperatorLike ,'');// 'like';
  //cxSetResourceString(@cxSFilterOperatorNotLike ,'');// 'not like';
  //cxSetResourceString(@cxSFilterOperatorBetween ,'');// 'between';
  //cxSetResourceString(@cxSFilterOperatorNotBetween , 'not between';
  //cxSetResourceString(@cxSFilterOperatorInList , 'in';
  //cxSetResourceString(@cxSFilterOperatorNotInList , 'not in';
  //cxSetResourceString(@cxSFilterOperatorYesterday , 'is yesterday';
  //cxSetResourceString(@cxSFilterOperatorToday ,'');//'is today';
  //cxSetResourceString(@cxSFilterOperatorTomorrow ,'');// 'is tomorrow';
  //cxSetResourceString(@cxSFilterOperatorLastWeek ,'');// 'is last week';
  //cxSetResourceString(@cxSFilterOperatorLastMonth ,'');// 'is last month';
  //cxSetResourceString(@cxSFilterOperatorLastYear ,'');// 'is last year';
  //cxSetResourceString(@cxSFilterOperatorThisWeek ,'');// 'is this week';
  //cxSetResourceString(@cxSFilterOperatorThisMonth ,'');// 'is this month';
  //cxSetResourceString(@cxSFilterOperatorThisYear ,'');// 'is this year';
  //cxSetResourceString(@cxSFilterOperatorNextWeek ,'');// 'is next week';
  //cxSetResourceString(@cxSFilterOperatorNextMonth ,'');// 'is next month';
  //cxSetResourceString(@cxSFilterOperatorNextYear ,'');// 'is next year';
  //cxSetResourceString(@cxSFilterAndCaption ,'');// 'and';
  //cxSetResourceString(@cxSFilterOrCaption ,'');// 'or';
  //cxSetResourceString(@cxSFilterNotCaption ,'');// 'not';
  //cxSetResourceString(@cxSFilterBlankCaption ,'');//'blank';
  // derived
  //cxSetResourceString(@cxSFilterOperatorIsNull ,'');// 'is blank';
  //cxSetResourceString(@cxSFilterOperatorIsNotNull ,'');// 'is not blank';
  //cxSetResourceString(@cxSFilterOperatorBeginsWith ,'');// 'begins with';
  //cxSetResourceString(@cxSFilterOperatorDoesNotBeginWith ,'');// 'does not begin with';
  //cxSetResourceString(@cxSFilterOperatorEndsWith ,'');// 'ends with';
  //cxSetResourceString(@cxSFilterOperatorDoesNotEndWith ,'');// 'does not end with';
  //cxSetResourceString(@cxSFilterOperatorContains ,'');// 'contains';
  //cxSetResourceString(@cxSFilterOperatorDoesNotContain ,'');// 'does not contain';
  // filter listbox's values
  cxSetResourceString(@cxSFilterBoxAllCaption         ,'(全部)');// '(All)'; '(全部)'
  cxSetResourceString(@cxSFilterBoxCustomCaption      ,'(自訂...)');// '(Custom...)'; '(自訂...)'
  cxSetResourceString(@cxSFilterBoxBlanksCaption      ,'(空值)');// '(Blanks)'; '(空值)'
  cxSetResourceString(@cxSFilterBoxNonBlanksCaption   ,'(非空值)');// '(NonBlanks)';  '(非空值)'

  //Menu
  //cxSetResourceString(@cxSGridNone ,'');//'None';
  //cxSetResourceString(@cxSGridSortColumnAsc ,'');//'Sort Ascending';
  //cxSetResourceString(@cxSGridSortColumnDesc ,'');//'Sort Descending';
  //cxSetResourceString(@cxSGridClearSorting ,'');//'Clear Sorting';
  //cxSetResourceString(@cxSGridGroupByThisField ,'');//'Group By This Field';
  //cxSetResourceString(@cxSGridRemoveThisGroupItem ,'');//'Remove from grouping';
  //cxSetResourceString(@cxSGridGroupByBox ,'');//'Group By Box';
  //cxSetResourceString(@cxSGridAlignmentSubMenu ,'');//'Alignment';
  //cxSetResourceString(@cxSGridAlignLeft ,'');//'Align Left';
  //cxSetResourceString(@cxSGridAlignRight ,'');//'Align Right';
  //cxSetResourceString(@cxSGridAlignCenter ,'');//'Align Center';
  //cxSetResourceString(@cxSGridRemoveColumn ,'');//'Remove This Column';
  //cxSetResourceString(@cxSGridFieldChooser ,'');//'Field Chooser';
  //cxSetResourceString(@cxSGridBestFit ,'');//'Best Fit';
  //cxSetResourceString(@cxSGridBestFitAllColumns ,'');//'Best Fit (all columns)';
  //cxSetResourceString(@cxSGridShowFooter ,'');//'Footer';
  //cxSetResourceString(@cxSGridShowGroupFooter ,'');//'Group Footers';
  //cxSetResourceString(@cxSGridSumMenuItem ,'');//'Sum';
  //cxSetResourceString(@cxSGridMinMenuItem ,'');//'Min';
  //cxSetResourceString(@cxSGridMaxMenuItem ,'');//'Max';
  //cxSetResourceString(@cxSGridCountMenuItem ,'');//'Count';
  //cxSetResourceString(@cxSGridAvgMenuItem ,'');//'Average';
  //cxSetResourceString(@cxSGridNoneMenuItem ,'');//'None';

end;

自動塞入一萬萬行資料

declare @counter int
set @counter = 0
while @counter <10000begin  set @counter = @counter + 1  print 'The counter is ' + cast(@counter as char)  insert into log (
logdate,userid,pcid,sourcefile,filesize,filehash,writez,logmemo,domainid,hasfile,filelogtype,domain_name,user_name,full_name,compu
ter_name,location,format_tag,dept_name,host_address,backup_path,exe_name,remote_host,is_blocked,dest_drive,dest_drive_type,self_ex
tract_type,fort_server_id) select top 10000
logdate,userid,pcid,sourcefile,filesize,filehash,writez,logmemo,domainid,hasfile,filelogtype,domain_name,user_name,full_name,compu
ter_name,location,format_tag,dept_name,host_address,backup_path,exe_name,remote_host,is_blocked,dest_drive,dest_drive_type,self_ex
tract_type,fort_server_id from log
end