diff --git a/FrameStory.pas b/FrameStory.pas
index e61305b..a3665a7 100644
--- a/FrameStory.pas
+++ b/FrameStory.pas
@@ -33,6 +33,15 @@ implementation
 
 procedure TStoryFrame.BackRectangleClick(Sender: TObject);
 begin
+  with Sender as TRectangle do
+    begin
+      var next_image:= ImageList1.Source[Tag].MultiResBitmap[0];
+      Image1.MultiResBitmap[0].Assign(next_image);
+      tag:= tag + 1;
+    end;
+
+  exit;
+
   MainForm.MainRectangle.Visible := True;
   MainForm.StoryRectangle.Visible := False;
 end;