3х мерный массив координат

[NewLamer&Programer]

Сообщение от BDA

Вот заготовочка сапера (может натолкнет на какие-нибудь мысли). Захотелось тоже написать

компилировать сие действо мой старенький delphi 7 отказался

[Serge_Bliznykov]

странно.. а что говорит?

попробуйте такой архив: saper_BDA.rar

[NewLamer&Programer]

Сообщение от Serge_Bliznykov

странно.. а что говорит?

попробуйте такой архив: Вложение 56841

говорит undeclared identifier TMainFormOnTaskbar, ваш архив откомплировал нормально game:= not game; это как аналог game:= False;? а так особо вопросов нет все понятно вы там на мой предыдущий пост ответьте все таки пожалуйсто

з.ы. да и еще Timer1.Enabled := game; это как понимать? о_О

[Serge_Bliznykov]

game:= not game; это как аналог game:= False;?

нет. Это аналог -
если game является True - тогда присвоить game False
иначе (если game равняется False) - тогда присвоить game True

в коде на Delhi можно записать так:

if game then game := False
  else game := True;

вы там на мой предыдущий пост ответьте все таки пожалуйсто

2. просто скажите мне как мне сделать функцию типа Enabled, которая будет что то включать и выключать(по присвоении Enabled:= True/False), можно без рекурсии

дык. код на кнопке Button1Click смотрели? game := not game; видели? Это и есть ответ на ваш вопрос.

что такое системный таймер не знаю(не sleep() часом?)

см. функцию Now() или функцию Time()

что такое свойство класса тоже плохо себе представляю (примерчик бы)

type
  TForm1 = class(TForm)
    Button1: TButton;
    Timer1: TTimer;
    procedure FormPaint(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure FormMouseDown(Sender: TObject; Button: TMouseButton;
      Shift: TShiftState; X, Y: Integer);
    procedure FormCreate(Sender: TObject);
    procedure Timer1Timer(Sender: TObject);
  private
    { Private declarations }
    ATime : integer;
  public
    { Public declarations }
  end;

выделил цветом. То, что в секции private доступно только методам самого класса, то, что в public - доступно извне...
Очень рекомендую ознакомиться с ООП, методами и свойствами класса...

Впрочем, в данном случае глобальная переменная тоже вполне себе приемлема!

[BDA]

undeclared identifier TMainFormOnTaskbar

Достаточно закомменировать эту строчку.

game:= not game; это как аналог game:= False;?

game = not game это game = not game
Это значит, что переменной присваивается значение, обратное текущему
true = not false
false = not true

Timer1.Enabled := game;

Таймер включен, если флажок game = true, т.е. мы находимся в процессе игры.

UPD Опоздал я...

[NewLamer&Programer]

а расскажите мне про событие OnPaint
когда оно происходит?
и как получается что у вас только в нем рисуются квадраты, но если кликнуть по Image, то квадрат выделяется? (да, вижу в OnPaint Brush.Colot:= clred; ), просто не пользовался еще этим методом

з.ы. гугл не нашел ничего конкретного про это событие

[BDA]

Во-первых, у меня нет Image (это чудесно, по-моему).
Во-вторых, пара полезных ссылок:
http://beluch.ru/progr/100comp/4_2.htm
http://cadzone.ru/content/view/1229/43/

Вкратце (как я понимаю), когда требуется перерисовать форму, то вызывается обработчик onpaint. Чтобы появился красный квадрат, я вручную вызываю перерисовку.