Работа выполнена досрочно, содержание по существу, маленький недочет был исправлен. Спасибо!
Светлана
им. С.Ю.Витте
Узнайте стоимость индивидуальной работы
это быстро и бесплатно
Оформите заказ сейчас и получите скидку 100 руб.!
Работа с диалоговыми окнами
Тип
Реферат
Предмет
Информатика и программирование
Просмотров
1714
Размер файла
18 б
Поделиться
Ознакомительный фрагмент работы:
Работа с диалоговыми окнами
Самостоятельная работа
По дисциплине:
Языки программирования
Задание
Тема № Стандартные диалоговые окна открытия, закрытия, сохранения файла. Использование общего диалога для функций шрифтов, цветов, печати, справочной системы
Прочитайте внимательно условия следующих задач и аналогично №1 составьте программу задачи № 2
Задача №1. Создайте меню Файл-Открыть, Вид -Шрифт. Загрузите в окно RihtTextBox файл в формате .rtf , выбранный из окна «Открыть». Сделайте текст в окне жирным через подменю Шрифт
Задача №2. Создайте меню Файл-Открыть, Вид -Шрифт. Загрузите в окно RihtTextBox файл в формате .rtf , выбранный из окна «Открыть». Сделайте текст в окне курсивным через подменю Шрифт
Краткое содержание темы: Использование общего диалога для функций шрифтов, цветов, печати, справочной системы
Диалоговое окно настройки шрифтов текста
Для вызова диалогового окна настройки шрифтов используется метод ShowFont, например:
CommonDialog1. ShowFont
Всё просто, но следует учитывать один нюанс с свойством Flags. При желании воспользоваться окном выбора шрифтов, отображающим только шрифты для печати, шрифты экрана или те и другие, то Visual Basic потребует установить свойство Flags перед тем, как вызывать на экран окно Font
Ниже представлена таблица с описанием наиболее важных свойств:
| Color | Используется только для цветных принтеров |
| FontBold, FontItalic, FontStrikeThru, FontUnderline, | Эти свойства принимают значения True или False. Если установлен флаг cdlCFEffects, то это позволяет пользователю использовать эти свойства |
| FontName | Возвращает / устанавливает имя шрифта |
| FontSize | Возвращает / устанавливает размер шрифта |
| Min, Max | Используется для указания размеров. Необходимо установить cdlCFLimitSize перед использованием этих свойств |
Можно считать значения различных свойств шрифта, чтобы увидеть изменения, внесенные пользователем. Например, значение CommonDialog1.FontName содержит имя шрифта, который выбрал пользователь. После этого необходимо написать код для введения в силу внесенных изменений.
Диалоговое окно настройки цветовой палитры
Для настройки цвета фона формы и расположенных в форме элементов можно использовать диалоговое окно настройки цветовой палитры. Для вызова этого диалогового окна используется метод ShowColor, например: CommonDialog1. ShowColor
Константы, используемые для настройки диалогового окна выбора цветовой палитры, перечислены в табл. Значения для метода Flags диалогового окна цветовой палитры
| Константа | Значение | Описание |
| cdlCCFullOpen | &H2 | Помещает в диалоговое окно дополнительную кнопку Добавить в набор и цветовое поле с маркером и линейкой назначения оттенка для добавления цветов в поля Дополнительные цвета диалогового окна цветовой палитры (рис. 7.25) |
| cdlCCShowHelp | &H8 | Добавляет в диалоговое окно кнопку Справка |
| cdlCCPreventFullOpen | &H4 | Скрывает кнопку Добавить в набор |
| cdlCCRGBInit | &H1 | Восстанавливает в диалоговом окне исходный набор цветов |
Решение задачи №1
Private Sub Открыть_Click()
CommonDialog1.DialogTitle = "открыть"
CommonDialog1.Filter = "текстовые документы RTF|*.rtf|рисунки|*.bmp"
CommonDialog1.ShowOpen
If CommonDialog1.FilterIndex = 1 Then
RichTextBox1.LoadFile (CommonDialog1.FileName)
ElseIf CommonDialog1.FilterIndex = 2 Then
Image1.Picture=LoadPicture(CommonDialog1.FileName)
End If
End Sub
Private Sub Шрифт_Click()
CommonDialog1.Flags = 1
CommonDialog1.ShowFont
RichTextBox1.SelBold = CommonDialog1.FontBold
End Sub
Нет нужной работы в каталоге?
Сделайте индивидуальный заказ на нашем сервисе. Там эксперты помогают с учебой без посредников 
Разместите задание – сайт бесплатно отправит его исполнителя, и они предложат цены.
Цены ниже, чем в агентствах и у конкурентов
Вы работаете с экспертами напрямую. Поэтому стоимость работ приятно вас удивит
Бесплатные доработки и консультации
Исполнитель внесет нужные правки в работу по вашему требованию без доплат. Корректировки в максимально короткие сроки
Гарантируем возврат
Если работа вас не устроит – мы вернем 100% суммы заказа
Техподдержка 7 дней в неделю
Наши менеджеры всегда на связи и оперативно решат любую проблему
Строгий отбор экспертов
К работе допускаются только проверенные специалисты с высшим образованием. Проверяем диплом на оценки «хорошо» и «отлично»
1 000 +
Новых работ ежедневно
Требуются доработки?
Они включены в стоимость работы 
Работы выполняют эксперты в своём деле. Они ценят свою репутацию, поэтому результат выполненной работы гарантирован 
Иванна
Математика
История
Экономика
159599
рейтинг
рейтинг
3275
работ сдано
работ сдано
1404
отзывов
отзывов
Ludmila
Математика
Физика
История
156492
рейтинг
рейтинг
6068
работ сдано
работ сдано
2737
отзывов
отзывов
Svetlana
Химия
Экономика
Биология
105734
рейтинг
рейтинг
2110
работ сдано
работ сдано
1318
отзывов
отзывов
Константин Николаевич
Высшая математика
Информатика
Геодезия
62710
рейтинг
рейтинг
1046
работ сдано
работ сдано
598
отзывов
отзывов
Отзывы студентов о нашей работе
64 096 оценок
среднее 4.9 из 5
Светлана
им. С.Ю.Витте
Работа выполнена досрочно, содержание по существу, маленький недочет был исправлен. Спасибо!
Кирилл
БПТ
Обращался к Елене Александровне второй раз
Всё очень здорово и оперативно сделанно, без за...
Антон Аверин
"КрасГАУ"
Заказываю в первый раз у Евгения , и остался максимально доволен , всё чётко !)
Обращался к Елене Александровне второй раз
Всё очень здорово и оперативно сделанно, без замечаний
Рекомендую всем данного исполнителя
Кирилл
БПТ
Заказываю в первый раз у Евгения , и остался максимально доволен , всё чётко !)
Антон Аверин
"КрасГАУ"
Последние размещённые задания
Ежедневно эксперты готовы работать над 1000 заданиями. Контролируйте процесс написания работы в режиме онлайн 
1 минуту назад
4 минуты назад
Расчет параметров участка электроэнергетической системы
Решение задач, Электрические системы, электроника, электротехника
Срок сдачи к 8 янв.
4 минуты назад
Доклад на тему "личность в теории деятельности а. н. леонтьева" + презентация
Доклад, Психология личности
Срок сдачи к 27 дек.
4 минуты назад
5 минут назад
Заполнить журнал регистрации хозяйственных операций малого предприятия, проставив в нем корреспонденцию счетов
Другое, Финансовый учет и анализ
Срок сдачи к 4 янв.
6 минут назад
7 минут назад
7 минут назад
7 минут назад
8 минут назад
9 минут назад
9 минут назад
9-11 страниц. правовые основы военной реформы в ссср в 20-е гг
Реферат, История государства и права России
Срок сдачи к 26 дек.
10 минут назад
10 минут назад
12 минут назад
12 минут назад
12 минут назад
12 минут назад
Закажи индивидуальную работу за 1 минуту!
Размещенные на сайт контрольные, курсовые и иные категории работ (далее — Работы) и их содержимое предназначены исключительно для ознакомления, без целей коммерческого использования. Все права в отношении Работ и их содержимого принадлежат их законным правообладателям. Любое их использование возможно лишь с согласия законных правообладателей. Администрация сайта не несет ответственности за возможный вред и/или убытки, возникшие в связи с использованием Работ и их содержимого.
«Всё сдал!» — безопасный онлайн-сервис с проверенными экспертами
Используя «Свежую базу РГСР», вы принимаете пользовательское соглашение
и политику обработки персональных данных
Сайт работает по московскому времени:
Мы ВКонтакте 
Трейлер о сайте
Принимаем к оплате
© 2011—2025 Всё сдал!