[lmikle]

Мы имеем в виду пре-загрузку ТОЛЬКО самих картинок. Вот эта процедура должна выглядеть как-то так:

Код:

procedure TForm1.TableDrawCell(Sender: TObject; ACol, ARow: Integer;   //Ïåðåðèñîâêà òàáëèöû
  Rect: TRect; State: TGridDrawState);
var
  i,j:integer;
begin
for i:=1 to 4 do
 for j:=0 to 143 do
 if (Plane[i,j]>0) then begin
  table.Canvas.StretchDraw(table.CellRect(j,i),bmpArr[Plane[i,j]]);  // <-- !!!
  end;
end;

А bmpArr заполняется при старте программы. Все остальное не трогается.