|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
14.01.2012, 22:52 | #601 | |
Инженер ИС
Старожил
Регистрация: 13.12.2006
Сообщений: 2,671
|
Цитата:
Код:
Код:
Руководитель проекта MMO 2D RPG: Настоящее имя Денис Стрижак (10.05.1981-6.02.2019) Мир духу его
|
|
16.01.2012, 14:10 | #602 |
Регистрация: 12.01.2012
Сообщений: 7
|
Спасибо... Всё работает.
Сначала объявила переменные не в основной секции, естественно если подряд просто шарики выделять, выделение не сбрасывалось. Наконец дошло почему
A journey of a thousand miles begins with a single step
|
16.01.2012, 18:01 | #603 |
Регистрация: 12.01.2012
Сообщений: 7
|
А если сохранять к примеру используя save dialog, вот так можно писать?
Код:
A journey of a thousand miles begins with a single step
Последний раз редактировалось bukashka; 16.01.2012 в 18:04. |
17.01.2012, 12:57 | #604 |
Регистрация: 12.01.2012
Сообщений: 7
|
Я сделала отмену последнего хода, все данные о предыдущем положении фишек сохраняются в процедуре TForm1.ClickSpheres(Sender: TObject).
Но за ход в данном случае тогда будет считаться и просто переключение с фишки на фишку. Это можно как-то побороть?
A journey of a thousand miles begins with a single step
|
17.01.2012, 15:50 | #605 |
Инженер ИС
Старожил
Регистрация: 13.12.2006
Сообщений: 2,671
|
bukashka, у вас есть переменная clisp, проверяйте ее прежде чем сохранять данные в файл.
Руководитель проекта MMO 2D RPG: Настоящее имя Денис Стрижак (10.05.1981-6.02.2019) Мир духу его
|
17.01.2012, 17:04 | #606 |
Регистрация: 12.01.2012
Сообщений: 7
|
Beermonza, нифига не получается . Вот это работает как писала:
Код:
и еще такая штука на нажатие пункта в меню: Код:
A journey of a thousand miles begins with a single step
Последний раз редактировалось bukashka; 17.01.2012 в 17:07. |
17.01.2012, 17:09 | #607 |
Инженер ИС
Старожил
Регистрация: 13.12.2006
Сообщений: 2,671
|
Покажите мне код, где вы применили проверку переменной clisp до сохранения данных в файл.
Руководитель проекта MMO 2D RPG: Настоящее имя Денис Стрижак (10.05.1981-6.02.2019) Мир духу его
|
17.01.2012, 17:47 | #608 |
Регистрация: 12.01.2012
Сообщений: 7
|
Гг, не догоняю, чего вы от меня хотите Вы предлагаете в TForm1.ClickSpheres проверять clisp ? Так оно ж там в самом начале clisp := true... В общем туго, извините
A journey of a thousand miles begins with a single step
|
17.01.2012, 18:08 | #609 |
Инженер ИС
Старожил
Регистрация: 13.12.2006
Сообщений: 2,671
|
Хочу чтобы начали думать усиленно. Что такое clisp? ...это флажок, что произошел клик по шарику, а не в пустое место сетки. А так как эта переменная общая для всех процедур, то стало быть, ее можно проверить на False при записи очередного кода. Если clisp = False, значит это был ход. Теперь, где у вас должно быть сохранение хода? ...наверное при клике мышью по сетке. Это скорее всего процедура AreaMouseUp. Собственно, в ней вы уже видите проверку, ...до перемещения шарика, сохраните позицию и цвет всех шаров. Это и будет возможность отмены именно хода, если считать и применить сохраненные данные.
Руководитель проекта MMO 2D RPG: Настоящее имя Денис Стрижак (10.05.1981-6.02.2019) Мир духу его
|
17.01.2012, 18:55 | #610 |
Регистрация: 12.01.2012
Сообщений: 7
|
Это правильно, но я думала, честное слово
Первым делом именно в AreaMouseUp пыталась что-то сделать, но потом почему-то переключилась на ClickSpheres. В общем - ура - всё получилось ))) Спасибо!
A journey of a thousand miles begins with a single step
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Хорошие уроки | Render | Общие вопросы Delphi | 9 | 15.09.2012 07:13 |
Акцесс вопросы новичков | Yaga | Помощь студентам | 4 | 02.06.2008 00:16 |
Учебники для новичков в програмировании | Рар | Общие вопросы Delphi | 6 | 08.01.2007 08:07 |