I was wondering, is it possible to put all this into a Const part, so that I don't have to initiate variables?
type
TSaveTables=array[1..4] of TMemDataset;
var
vSaveTables:TSaveTables;
begin
vSaveTables[1]:=Products;
vSaveTables[2]:=Boms;
vSaveTables[3]:=Stocks;
vSaveTables[4]:=Orders;
end;