Subversion Repositories jumper

Rev

Rev 8 | Rev 10 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 8 Rev 9
Line 641... Line 641...
641 
  LevelArray := LevelStringToLevelArray(LevelString, true);
 641 
  LevelArray := LevelStringToLevelArray(LevelString, true);
642 
  if Length(LevelArray) = 0 then Exit;
 642 
  if Length(LevelArray) = 0 then Exit;
643 
  BuildPlayground(LevelArray);
 643 
  BuildPlayground(LevelArray);
644 
  if not AreJumpsPossible then
 644 
  if not AreJumpsPossible then
645 
  begin
 645 
  begin
646 
    ShowMessage(LNG_LVL_INVALID_NO_JUMP);
 646 
    MessageDlg(LNG_LVL_INVALID_NO_JUMP, mtError, [mbOk], 0);
647 
  end;
 647 
  end;
648 
  RefreshTime;
 648 
  RefreshTime;
649 
  RefreshStonesRemoved;
 649 
  RefreshStonesRemoved;
650 
  RefreshPoints;
 650 
  RefreshPoints;
651 
end;
 651 
end;