一
一瞬间
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TfrmMain.ckfgPredicateClick(Sender: TObject);
begin
case TComponent(Sender).Tag of
0:
begin
if (dmBatchUpdate.ADODataSet1.LockType = ltBatchOptimistic) then
begin
dmBatchUpdate.ADODataSet1.Filtered := True;
dmBatchUpdate.ADODataSet1.FilterGroup := fgNone;
end;
end;
1:
begin
if (dmBatchUpdate.ADODataSet1.LockType = ltBatchOptimistic) then
begin
dmBatchUpdate.ADODataSet1.Filtered := True;
dmBatchUpdate.ADODataSet1.FilterGroup := fgPendingRecords;
end;
end;
end; // case
end;
错误信息:Undeclared identifier'ltBatchOptimistic' or Undeclared identifier'fgnone'
是不是这两种类型都得定义,但我不知定义为什么,那位高手帮忙解答一下
begin
case TComponent(Sender).Tag of
0:
begin
if (dmBatchUpdate.ADODataSet1.LockType = ltBatchOptimistic) then
begin
dmBatchUpdate.ADODataSet1.Filtered := True;
dmBatchUpdate.ADODataSet1.FilterGroup := fgNone;
end;
end;
1:
begin
if (dmBatchUpdate.ADODataSet1.LockType = ltBatchOptimistic) then
begin
dmBatchUpdate.ADODataSet1.Filtered := True;
dmBatchUpdate.ADODataSet1.FilterGroup := fgPendingRecords;
end;
end;
end; // case
end;
错误信息:Undeclared identifier'ltBatchOptimistic' or Undeclared identifier'fgnone'
是不是这两种类型都得定义,但我不知定义为什么,那位高手帮忙解答一下