//////////////////////////////////////////////////////////////////
// BoardMouseDown - Handles all occurances of clicks on the game
// board.
//////////////////////////////////////////////////////////////////

procedure TFrmBattleShip.BoardMouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);