ADO的问题！

Question

procedure TForm1.FaNoneOnClick(Sender: TObject);
begin
case TComponent(Sender).Tag of   //  0:
    begin
      if (DataModule2.ADODataSet1.LockType = ItBatchOptimistic  )
    then
      begin
       DataModule2.ADODataSet1.Filtered:=True;
       DataModule2.ADODataSet1.FilterGroup:=fgNone;
       end;
      end;
     1:
       begin
         if (DataModule2.ADODataSet1.LockType = ItBatchOptimistic)
     then
        begin
           DataModule2.ADODataSet1.Filtered:=True;
           DataModule2.ADODataSet1 .FilterGroup:=fgPendingRecords;
         end;
        end;
       end;//caseend;

Answer 1

是小寫lt(大寫為LT)
不是小寫it(大寫IT)

Answer 2

lt是LockType的兩個單詞的首字母

Answer 3

还要看看您的use语句是否有 ADOdb
*----------------
interface
uses
  SysUtils, Windows, Messages, Classes, Graphics, Controls, Forms,
  Dialogs, DBTables, DB, ADODB
...