//////////////////////////////////////////////////////////////////
// BoardMouseDown - Handles all occurances of
clicks on the game
// board.
//////////////////////////////////////////////////////////////////
procedure TFrmBattleShip.BoardMouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);