TMouseButton Button, TShiftState Shift, int
Листинг 10.11.
Заголовочный файл главной формы (saper_.h)
#ifndef saper_H fdefine saper_H #include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
# include <Menus.hpp>
class TForml : public TForm { published: TMainMenu *MainMenul; // команды главного меню TMenuItem *N1; // Новая игра TMenuItem *N2; // команда "?" // команды меню "?" TMenuItem *N3; // Справка TMenuItem *N4; // О программе void __fasteall FormMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y);
void __fastcall FormPaint(TObject *Sender);
void _fastcall FormCreate(TObject *Sender);
// выбор,команды в меню void fastcall NIClick(TObject *Sender);
// Новая игра void __fastcall N3Click(TObject *Sender);
// Справка void __fastoall N4Click(TObject *Sender);
// О программе private: void fastcall ShowPole(int status);
// отображает поле // отображает содержимое клетки void __fastcall Kletka (int row, int col, int status);
void __fastcall Mina (int x, int y);
// рисует мину void __fastcall Flag( int x, int y);
// рисует флаг public: __fastcall TForml(TComponent* Owner);
}; extern PACKAGE TForml *Forml; tendif
Содержание раздела