Чтение и запись.
Тип: Строка.
Возвращает или задает значение, указывающее заголовок пункта меню.
Если задать для свойства Текст значение "-", пункт меню будет отображаться как разделитель (горизонтальная линия), а не стандартный элемент меню.
ЭлементМеню1.Текст = "Новый";
Копировать Выделить всёФункция Новый_Нажатие() Экспорт Сообщить("Новый_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах()); КонецФункции ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ГлавноеМеню1 = Ф.ГлавноеМеню(); _Файл = ГлавноеМеню1.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Файл")); _Справка = ГлавноеМеню1.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Справка")); ЭлементМеню1 = Ф.ЭлементМеню("Новый"); ЭлементМеню1.Текст = "Новый"; ЭлементМеню1.Нажатие = Ф.Действие(ЭтотОбъект, "Новый_Нажатие"); ЭлементМеню1.СочетаниеКлавиш = Ф.СочетаниеКлавиш.ShiftF10; Подменю_Файл_Новый = _Файл.ЭлементыМеню.Добавить(ЭлементМеню1); Подменю_Файл_Открыть = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Открыть")); Подменю_Файл_Сохранить = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Сохранить")); Подменю_Файл_СохранитьКак = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Сохранить как...")); Подменю_Файл_Выход = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Выход")); Подменю_Файл_СохранитьКак_txt = Подменю_Файл_СохранитьКак.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Файл *.txt")); Подменю_Файл_СохранитьКак_rtf = Подменю_Файл_СохранитьКак.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Файл *.rtf")); Подменю_Справка_Помошник = _Справка.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Помошник")); Подменю_Справка_Опрограмме = _Справка.ЭлементыМеню.Добавить(Ф.ЭлементМеню("О программе...")); Форма1.Меню = ГлавноеМеню1; Ф.ЗапуститьОбработкуСобытий();
Копировать Выделить всёФункция Новый_Нажатие() Экспорт Сообщить("Новый_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах()); КонецФункции ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ГлавноеМеню1 = Ф.ГлавноеМеню(); _Файл = ГлавноеМеню1.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Файл")); _Справка = ГлавноеМеню1.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Справка")); ЭлементМеню1 = Ф.ЭлементМеню("Новый"); ЭлементМеню1.Текст = "Новый"; ЭлементМеню1.Нажатие = Ф.Действие(ЭтотОбъект, "Новый_Нажатие"); ЭлементМеню1.СочетаниеКлавиш = Ф.СочетаниеКлавиш.ShiftF10; Подменю_Файл_Новый = _Файл.ЭлементыМеню.Добавить(ЭлементМеню1); Подменю_Файл_Открыть = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Открыть")); Подменю_Файл_Сохранить = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Сохранить")); Подменю_Файл_СохранитьКак = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Сохранить как...")); Подменю_Файл_Выход = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Выход")); Подменю_Файл_СохранитьКак_txt = Подменю_Файл_СохранитьКак.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Файл *.txt")); Подменю_Файл_СохранитьКак_rtf = Подменю_Файл_СохранитьКак.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Файл *.rtf")); Подменю_Справка_Помошник = _Справка.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Помошник")); Подменю_Справка_Опрограмме = _Справка.ЭлементыМеню.Добавить(Ф.ЭлементМеню("О программе...")); Форма1.Меню = ГлавноеМеню1; Сообщить(?( ЭлементМеню1.Текст = "Новый" , "", "!!! ") + "ЭлементМеню.Текст (MenuItem.Text) Свойство" + " " + ТекущаяДата());