Задача 5.
Создать проект, который имеет вид краткого обозревателя.
Создать интерфейс программы по образцу:
Создать форму. На ней разместить тестовое поле, 1 кнопку, две надписи, ListBox. TMemo. Установите значения свойств, перечисленные в таблице. Когда вы это сделаете, форма примет такой вид, как на рисунке.
Ход работы:
Загрузите Lazarus. Создайте новый проект и сохраните его.
Создайте форму по образцу.
Установите новые значения для свойств, перечисленные в таблице.
Компонент
Свойство
Значение
Форма
Color
Position
Caption
Выберите любой цвет
poDesktopCenter (приложение будет открываться по центру экрана).
Краткий обозреватель
Кнопка
Caption
>>
TMemo
Lines
В появившемся окне удалите текст
TEdit
Text
Оставьте пустую строку
ListBox
Items
В открывшемся окне пропишите:
Киев
Николаев
Львов
Суммы
Черновцы
Надпись 1,2
Caption
Выберите город,
Краткая информация о городе.
Пропишите такой код для кнопки:
if listbox1.selected [0] then
Memo1.Lines.LoadFromFile('c:\Users\Anna\Desktop\Lazarus задачи\5\1.txt');
if listbox1.selected [1] then
Memo1.Lines.LoadFromFile('c:\Users\Anna\Desktop\Lazarus задачи\5\2.txt');
if listbox1.selected [2] then
Memo1.Lines.LoadFromFile('c:\Users\Anna\Desktop\Lazarus задачи\5\3.txt');
if listbox1.selected [3] then
Memo1.Lines.LoadFromFile('c:\Users\Anna\Desktop\Lazarus задачи\5\4.txt');
if listbox1.selected [4] then
Memo1.Lines.LoadFromFile('c:\Users\Anna\Desktop\Lazarus задачи\5\5.txt');
В скобках указывается путь к заранее созданному текстовому файлу, в который помещается текст о городах, который должен быть выведен после выбора определенного города и нажатия на кнопку.
Для ListBox прописывается такой код:
Edit1.Text:=ListBox1.Items.Strings[listBox1.itemindex];
Установление нового свойства для ListBox показано на картинке:
Сохраните проект.
Задача 6
Создание органайзера в Lazarus
Нам понадобятся: Edit1, Edit2, Label1, Label2, Button1.
|
Компонент |
Свойство |
Значение |
1 |
Form1 |
Color |
Розовый |
2 |
Edit1 |
Text |
пусто |
3 |
Edit2 |
Text |
пусто |
4 |
Button1 |
Caption |
узнать |
5 |
Label1 |
Caption |
Введите какой день… |
6 |
Label2 |
Caption |
Вид занятия |
Дважды нажимаем на Button1 , и вставляем код
