|
Как организовать группы кнопок типа SpeedButton в 1с
| ☑ |
0
Jokerman
27.07.11
✎
17:21
|
Здрасте, идея проста есть 3 кнопы, жмешь одну она зажимается(вдавливается) остальные отжимаются. Не стал возиться с свойством рамка, подумал может что-то получше есть.
|
|
1
Ненавижу 1С
гуру
27.07.11
✎
17:22
|
у кнопок командной панели есть свойство Пометка
|
|
2
Jokerman
27.07.11
✎
17:25
|
А группировать можно как-то или самому придется запоминать состояния?
|
|
3
Ненавижу 1С
гуру
27.07.11
✎
17:25
|
(2) состояния она помнит сама (каждая кнопка), а вот менять их придется вручную
|
|
4
acsent
27.07.11
✎
17:27
|
Это не спидбатн. Спидбатн - это когда жмешь и держишь а оно жимется много раз
|
|
5
Ненавижу 1С
гуру
27.07.11
✎
17:28
|
это?
Процедура НажатиеКнопки(Кнопка)
Кнопка.Пометка = Истина;
Для каждого Кн Из ЭлементыФормы.ДействияФормы.Кнопки Цикл
Если Кн=Кнопка Тогда
Продолжить;
КонецЕсли;
Кн.Пометка = Ложь;
КонецЦикла;
КонецПроцедуры
|
|
6
Jokerman
27.07.11
✎
17:33
|
(5) Да, да я примерно тоже нашкляпал!
|
|
7
Jokerman
27.07.11
✎
17:34
|
Кнопка.Пометка=Не Кнопка.Пометка;
Для каждого Кнопа Из ЭлементыФормы.ДействияФормы.Кнопки Цикл
Если Кнопа=Кнопка Тогда
продолжить;
КонецЕсли;
Если Кнопка.Пометка Тогда
Кнопа.Пометка=Не Кнопка.Пометка;
КонецЕсли;
КонецЦикла;
|
|
8
Jokerman
27.07.11
✎
17:35
|
(4) Не знаю на дельфийский точно похож!
|
|
9
Fragster
гуру
27.07.11
✎
17:36
|
а чем это лучше радиокнопок?
|
|
10
Jokerman
27.07.11
✎
17:37
|
(9) Не знаю захотелось разнообразия!
|
|
11
Jokerman
27.07.11
✎
17:37
|
Наверное потому что на кнопу легче с первого раза попасть :)
|
|