fpchess: Minor changes

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1873 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
sekelsenmat 2011-08-30 13:46:20 +00:00
parent ec7ac2a03b
commit 8e74329135
4 changed files with 4 additions and 4 deletions

View File

@ -10,7 +10,7 @@ uses
chessgame;
type
TChessModuleKind = (cmkSinglePlayer, cmkInternet, cmkAI);
TChessModuleKind = (cmkSameComputer, cmkInternet, cmkAgainstComputer);
{ TChessModule }

View File

@ -211,7 +211,7 @@ begin
inherited Create;
Description := 'Play against the computer - KCChess Engine';
Kind := cmkSinglePlayer;
Kind := cmkAgainstComputer;
end;
procedure TKCChessModule.CreateUserInterface;

View File

@ -60,7 +60,7 @@ begin
);*)
Description := 'Play online via the Free Internet Chess Server';
Kind := cmkSinglePlayer;
Kind := cmkInternet;
FICS_HOST := 'freechess.org';
FICS_PORT := 5000;

View File

@ -39,7 +39,7 @@ begin
inherited Create;
Description := 'Play against a friend in the same computer';
Kind := cmkSinglePlayer;
Kind := cmkSameComputer;
end;
procedure TSameComputerChessModule.CreateUserInterface;