안녕하세요...

코드에서 t값을 초기화 하는 부분을 넣으면 되겠네요...

Procedure TForm1.Timer1.Timer(Sender:TObject);
begin
    case t of
        1:image1.visible := true;
        2:image2.visible := true;
        3:image3.visible := true;
    end;
    Inc(t);
    if t >= 4 then t := 1;
end;

물론 t는 외부에서 초기화 하셔야 하겠죠....

그럼 좋은 하루 되세요...