|
begin
//mob.mob_index.Table1.Close;
//mob.mob_index.Table2.Close;
//mob.mob_index.Table3.Close;
Table4.CancelRange;
Table4.close;
Table4.Exclusive:=true;
Table4.AddIndex('newindex','date',[ixCaseInsensitive ]);
Table4.IndexName:='newindex';
table4.Exclusive:=false;
Table4.open;
Table4.SetRangeStart;
Table4.FieldByName('date').asdatetime:=strtodate(maskedit5.text);
Table4.SetRangeEnd;
Table4.FieldByName('date').asdatetime:=strtodate(Maskedit5.text);
Table4.ApplyRange;
end;
The above is my code, but the error of Table is busy!!
Beginner, please help! ! |
|