![]() |
|
v7: Где ошибка в простом (ОЧЕНЬ простом) коде? | ☑ | ||
---|---|---|---|---|
0
s-pc
20.08.11
✎
21:59
|
Не судите строго. Я еще только "знакомлюсь" с 1с.
Наваял вот такую форму - http://rpdana.narod.ru/1c_xox.gif Как видите, пока выдает ошибку, которую я не знаю как исправить. Идентификатор кнопок там - к1, к2, к3 и т.д. Код в конфигураторе вот такой === Перем ХОХ; // Крестик или Нолик Перем к; // Игровые кнопки Перем randomize ; // Случайное число Перем ИмяКнопки; // Генерируем случайное число и помещаем его в переменную "Ранд" Функция Ранд(Парам=0) Если Парам<>0 Тогда randomize =Парам; КонецЕсли; Если Число(randomize )=0 Тогда randomize =Число(СтрЗаменить(""+ТекущееВремя(),":","")); randomize =(16807*randomize )%2147483647; КонецЕсли; randomize =(16807*randomize )%2147483647; randomize =макс(randomize ,-randomize ); Возврат(randomize /2147483647); КонецФункции // Очищаем игровое поле и ставим свой нолик в случайную клетку Процедура Начали() ХОХ=""; Для КолКнопок = 1 ПО 9 Цикл Шаблон("[Форма.к" + КолКнопок +".Заголовок(ХОХ)]"); Шаблон("[Форма.к" + КолКнопок +".Доступность(1)]"); КонецЦикла; ХОХ="О"; Ранд = Окр(Ранд()*8,0)+1; Шаблон("[Форма.к" + Ранд +".Заголовок(ХОХ)]"); Шаблон("[Форма.к" + Ранд +".Доступность(0)]"); Форма.тИнфо.Заголовок ("Ваш ход!"); КонецПроцедуры Процедура Играем(ИмяКнопки) // Вот тут ошибка. Надо (пока) просто присвоить крестик заголовку текущей кнопки ХОХ = "Х"; Кнопка = Форма.ПолучитьАтрибут(ИмяКнопки); Кнопка.Заголовок(ХОХ); Кнопка.Доступность(0); Форма.тИнфо.Заголовок ("Ваш ход!"); КонецПроцедуры Процедура ПриОткрытии() // Для КолКнопок = 1 ПО 9 Цикл Шаблон("[Форма.к" + КолКнопок +".Заголовок()]"); Шаблон("[Форма.к" + КолКнопок +".Доступность(0)]"); КонецЦикла; СписокРейтиногов=СоздатьОбъект("СписокЗначений"); КонецПроцедуры === Где что нужно подправить, чтобы исправилось? |
|||
1
Rie
20.08.11
✎
22:04
|
(0) В формулах кнопок - что стоит-то?
|
|||
2
andrewks
20.08.11
✎
22:06
|
имхо, в формуле кнопки тебе надо не ИмяКнопки писать, а непосредственно идентификатор
|
|||
3
Rie
20.08.11
✎
22:07
|
+(1) В формуле для кнопки к1 пишешь:
Играем("к1"); В формуле для кнопки к2 пишешь: Играем("к2"); и т.д. |
|||
4
s-pc
21.08.11
✎
00:18
|
(3) (2) Уф! Наконец-то! Очередное спасибо за помощь!
|
|||
5
Мимохожий Однако
21.08.11
✎
09:16
|
Теперь сделай тоже самое с использованием таблицы на форме :-)
|
|||
6
aka AMIGO
21.08.11
✎
09:48
|