Смена картинки при выборе вкладки

[Shouldercannon]

Есть Image и PageControl. Задача:
при переключении вкладок менять картинку в Image (первая вкладка - pic1, вторая вкладка - pic2, третья вкладка - pic3, четвёртая вкладка - pic4).
Как такое сделать?

[ex.cluz]

Отслеживать индекс открытой вкладки.
В зависимости от него - менять картинку.

[Shouldercannon]

procedure TForm1.PageControl1Change(Sender: TObject);
begin
  case PageControl1.TabIndex of
  0: Image1.Picture.LoadFromFile('pic1.gif');
  1: Image1.Picture.LoadFromFile('pic2.gif');
  2: Image1.Picture.LoadFromFile('pic3.gif');
  3: Image1.Picture.LoadFromFile('pic4.gif');
  end;
end;

[DomiNick]

LoadFromFile - слишком жестоко... Загрузите картинки в переменные типа TBitmap и берите оттуда... Ну или через ImageList что ли...



З.Ы.

uses jpeg; // и прочее...