![]() |
|
v7: Как сделать большим окно ввода текста | ☑ | ||
---|---|---|---|---|
0
Aleksey
19.10.12
✎
01:10
|
Собственно обработка в которой пользователь вводит числовую информацию с клавиатуры. И хотелось бы чтобы цифры были не мелкие, а "чтобы с далека было видно".
Никто не подскажет как? |
|||
1
Партизан
19.10.12
✎
01:18
|
надпись, шрифт
|
|||
2
Aleksey
19.10.12
✎
01:19
|
(1) надпись <> поле ввода
Как в надпись вводить инфу? |
|||
3
Партизан
19.10.12
✎
01:27
|
(2) перехватывать и отображать
|
|||
4
Boleev v2
19.10.12
✎
01:31
|
(0) можно сделать только для всей формы. Зайди в свойтва формы
|
|||
5
Aleksey
19.10.12
✎
02:00
|
(4) не работает, всё равно мелко
|
|||
6
Злопчинский
19.10.12
✎
02:03
|
Формексом назначаешь на атрибут (поле ввода) -нужный размер текста и его цвет
|
|||
7
Злопчинский
19.10.12
✎
02:03
|
точно так же можно на ТЗ назначить большой шритфт...
|
|||
8
Boleev v2
19.10.12
✎
02:03
|
тогда либо
формексом или активикс на форму |
|||
9
Злопчинский
19.10.12
✎
02:05
|
//******************************************************************************
Процедура ПослеОткрытия() глРасширениеФормы = СоздатьОбъект("РасширениеФормы"); //глРасширениеФормы.Максимизирована = 1; глРасширениеФормы.ПолучитьАтрибут("ВыбНомерПакета") .Шрифт = глСервис.СоздатьШрифт("Arial",60); глРасширениеФормы.ПолучитьАтрибут("ВыбНомерПакета") .ЦветШрифта = 255; глРасширениеФормы.ПолучитьАтрибут("кнПодтвердить") .Шрифт = глСервис.СоздатьШрифт("Arial",20,7); глРасширениеФормы.ПолучитьАтрибут("кнОтказаться") .Шрифт = глСервис.СоздатьШрифт("Arial",20,7); глРасширениеФормы.ПолучитьАтрибут("кнСканироватьПервый") .Шрифт = глСервис.СоздатьШрифт("Arial",20,7); глРасширениеФормы.ПолучитьАтрибут("кнНОВЫЙПАКЕТ") .Шрифт = глСервис.СоздатьШрифт("Arial",20,7); КонецПроцедуры //ПослеОткрытия() |
|||
10
Aleksey
19.10.12
✎
02:08
|
Не формекс не люблю. Он у меня тормозит в терминале при 100 пользователях, поэтому хотелось бы обойтись без него
|
|||
11
Boleev v2
19.10.12
✎
02:09
|
(10) переходи на восьмерку куле. там это реализовано
|
|||
12
Злопчинский
19.10.12
✎
02:09
|
(10) а отслеживание мышки в нем отключено?
|
|||
13
Злопчинский
19.10.12
✎
02:10
|
(11) тогда при 100 пользователях ему точно вопрос из (0) будет сугубо неактуален очень долго...
|
|||
14
Aleksey
19.10.12
✎
02:12
|
(12) Давно это было ...
Хотя 1С++ обычный подключен |
|||
15
Злопчинский
19.10.12
✎
02:14
|
(14) пора реанимировать! отключить отслеживание мыши, отключить раскраску таблиц.. и .. и.. попробовать!!! сначала на 4-5 юзеров подключить... потом поболеее...
|
|||
16
Aleksey
19.10.12
✎
02:27
|
Нашел в интернете
//******************************************* Функция ПриВыбореЗначения(ОБ="") Если Об="" Тогда Об=Форма.АктивныйЭлемент() КонецЕсли; Если Лев(Об,2)="кн" Тогда Сообщить(Симв(Прав(Об,2))); Форма.ПолучитьАтрибут(Об).Видимость(0); Форма.ТекстДляСлепых.Заголовок(СтрЗаменить(Форма.ТекстДляСлепых.Заголовок()+Симв(Прав(Об,2)),",",".")); Форма.ПолучитьАтрибут(Об).Видимость(1); КонецЕсли; КонецФункции Процедура ПриОткрытии() Для к=0 По 9 Цикл Форма.ПолучитьАтрибут("кн"+(48+к)).Заголовок("&"+к); КонецЦикла; Форма.ПолучитьАтрибут("кн46").Заголовок("&."); Форма.ПолучитьАтрибут("кн44").Заголовок("&,"); КонецПроцедуры На форме кн48 - кн57, кн44 и кн46, "ТекстДляСлепых" - текст с большими буковами (с) Как сделать большой шрифт в поле ввода????? |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |