|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
15.01.2012, 13:09 | #1 |
Новичок
Джуниор
Регистрация: 15.01.2012
Сообщений: 0
|
объяснить код на Delphi за WMR
Понимая, что данные формы посещают только хорошие программисты, прошу помочь.
Код, который будет приведен ниже взят из программы по написании "шахмат". Хочу узнать, что делают именно эти строчки. За полный ответ ( с объяснениями на русском ) заплачу 100 WMR. procedure TFigure.con_y(y:integer); begin self.nach_y:=y; if (Self.y>0)and(Self.y<9)and(Self.x>0 )and(Self.x<9) then Self.Image.Parent:=PanelArray[Self.x,Self.y] else Self.Image.Parent:=PanelArray[0,0] end; В конце вашего поста, оставьте ваш кошелек, деньги переведу вечером. |
15.01.2012, 13:34 | #2 | |
Новичок
Джуниор
Регистрация: 15.01.2012
Сообщений: 0
|
Цитата:
if (Self.y>0)and(Self.y<9)and(Self.x>0 )and(Self.x<9) then Self.Image.Parent:=PanelArray[Self.x,Self.y] else Self.Image.Parent:=PanelArray[0,0] или хотя бы Self.Image.Parent:=PanelArray[Self.x,Self.y] else Self.Image.Parent:=PanelArray[0,0] За ответ в течении нескольких минут заплачу 150 WMR. |
|
15.01.2012, 13:49 | #3 |
Lawful Evil
Участник клуба
Регистрация: 13.05.2008
Сообщений: 1,208
|
Что-то типа проверки на место хода, чтоли.
TFigure.nach_y присваивается значение y, переданное в функцию, потом TFigure.у и TFigure.х проверяются на нахождение в диапазоне [1..8], если они в диапазоне, то TFigure.Image.Parent присваивается родитель PanelArray[TFigure.x,TFigure.y], иначе присваивается родитель с нулями. Скорее всего проверка фигуры на невыход за границы поля.
Алгоритм - бесплатен. Поиск багов - бесплатен. Реализация алгоритма - за отдельную плату.
На форуме помогают советами и объясняют, а не пишут на халяву программы, лабы, курсачи и т.д. (c) |
15.01.2012, 13:51 | #4 |
Сумрачная тень
Форумчанин
Регистрация: 05.03.2009
Сообщений: 689
|
В данном коде проверяется принадлежность фигуры любой клетке, за исключением граничных. И в зависимости от расположения определяется компонент-родитель для отображения фигуры. Предположу, что данная процедура проверяет возможность перемещения. Только не делается проверка на граничный [9,9]. В этом может быть ошибка. У вас на форме располагается 100 панелей и 1 имадж, который меняет родителя для прорисовки (делается ход) взависимости от допустимости условия. Наверное так.
"ковыряю изнутри" (с)
Последний раз редактировалось 3D Hunter; 15.01.2012 в 13:53. |
15.01.2012, 14:06 | #5 |
Made In USSR!
Старожил
Регистрация: 01.09.2010
Сообщений: 3,657
|
Код:
"...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..."
(c) Юрий Клинских aka "Хой" Последний раз редактировалось Mad_Cat; 15.01.2012 в 14:57. |
15.01.2012, 15:37 | #6 |
Сумрачная тень
Форумчанин
Регистрация: 05.03.2009
Сообщений: 689
|
Огласите победителя! кто является счастливым обладателем 150 деревянных, а?
"ковыряю изнутри" (с)
|
15.01.2012, 23:28 | #7 |
Пользователь
Регистрация: 25.11.2011
Сообщений: 52
|
Igor23dec@yandex.ru
ICQ 2168364
e-mail: igor23dec@yandex.ru , ICQ: 2168364 , Telegram: @IgorVN
Delphi, PHP Примеры http://igorvn.ucoz.ru/ |
15.01.2012, 23:46 | #8 |
Форумчанин
Регистрация: 31.05.2011
Сообщений: 184
|
> Огласите победителя! кто является счастливым обладателем 150 деревянных, а?
Победителем стал HelpMeGiveWmr, получивший объяснение, как работает код, на халяву.
Программист-фрилансер, готовый рассмотреть предложения на постоянную удаленную работу... Ответственный, трудолюбивый
telegram: flancejob |
16.01.2012, 00:47 | #9 |
Босс
Форумчанин
Регистрация: 03.06.2009
Сообщений: 125
|
+1.
Тов.Админы, чего там за правила такие, что нельзя отзывы ставить одному и тому же человеку подряд??? Две одинаковые вложенные ошибки называются четной ошибкой и ошибкой не являются. Ася 255507394. Отзывы здесь. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
кто может объяснить,почему на моем компе программа работает на других нет?код в Delphi | Symba | Общие вопросы Delphi | 1 | 24.03.2011 01:03 |
как грамотно объяснить код (делфи 7) | MegaMozg28 | Помощь студентам | 0 | 10.06.2010 14:23 |
Срочно!Нужно объяснить код программ! | ArcaN0id | Помощь студентам | 1 | 28.06.2009 12:15 |
Delphi. Объяснить прогу. | Bomber | Помощь студентам | 0 | 02.06.2008 19:59 |