Лабораториялық жұмыс №2

Стандарт визуальды компоненттер.

Ұзақтығы:

80 мин

Пәні: Информатика және программалау.

Мақсаты: Бірінші сабақта қарастырылған программаны құру процесін бекіту. Delphi стандарт компонентер тобымен танысу.

Оқыту нәтижесі:

Сабақты меңгергеннен кейін қолданушы:

Программада тексттер редакторларын, таңдау тізімін, басқару элементер тобын біріктіретін компонентерді қолдана білуі керек.

Қолданылатын программа: Delphi 5.0- и.о;

І. Standard панелінде орналасқан басқару элементтерін қолдану әдістерін үйрену. Бұл компоненттер қаситтері мен әдістерін қарастыру.

Ұсынылатын уақыт 40 минут.

Standard панелінде мыналар орналасқан:

TMainMenu- программаның негізгі менюін құруға арналған компонент. №6 лаб. жұмыста жеке қарастырылады.

TpopupMenu - программаның контекстік меюін құруға арналған компонент. №6 лаб. жұмыста жеке қарастырылады.

Tlabel- статикалық тексттерге арналған компонент. Түсініктеме тексттерді бейнелеуге қолданылады.

TEdit-біржолды редактор, оның көмегімен ұзын тексттік жолды енгізуге және/немесе бейнелеуге болады.

TMemo- көпжолды редактор, ұзын текстті енгізуге, редакциялауға және/немесе бейнелуге арналған.

TButton- программаларды басқаруға қолданылатын кнопка.

TCheckBox- иә/жоқ типті шешімді қабылдауға арналған тәуелсіз айырғыш.

ТRadioButton- өзара жоққа шығарушы шешімдердің бірін таңдауға арналған тәуелді айырғыш.

TListBox- таңдаудың стандарт тізімі, оның көмегімен қолданушы таңдау элементтерінің бірін немесе бірнешеуін таңдайды.

TComboBox- таңдаудың құрастырылған тізімі, TlistBox тізімі және TEdit редакторы комбинациясын көрсетеді.

TScrollBar- жылжыту жолы, сандық шама мәнін визуальды басқаруға қолданылады.

TGroupBox- рамкалы тікбұрышты терезе. Ішкі компоненттерді орналастыруға арналған контейнер.

TRadioCroup- тәуелді айырғыштарды орналастыруға арналған арнайы контейнер.

TPanel- жалпыға арналған контейнер.

1. Дайындық жұмысы:

1.2. Өз каталогыңызда Lab 2 каталогын құрыңыз.

1.3. Project 1 проектін ашыңыз: СDelphi 5.0\fam\lab 2.

1.4. Өз каталогыңыздың lab 2 каталогына проектті сақтаңыз

(File\Save Project as)

2. ListBox1- таңдау тізімі.

2.2. Формаға ListBox1 компонентін қойыңыз.

2.3. Items қасиетіне келесім мәндерді енгіз: Фунт, Пуд, Унция, Драхм, Гран. Items қасиеті (Tslring класы) жолдар тізімін сақтайды.

2.4. ListBox1 компонентінің өлшемін және түсін өзгертіңіз.

2.5. ListBox1 компоненті үшін Onclick оқиғасын өңдеушіні құрыңыз. Onclick оқиғасы тізімнен элементті таңдағанда орындалады.

Оқиға өңдеуші:

Procedure Tform1. ListBox1Click (Sender: T Objeet);

begin

{ Егер редакторға информация енбесе, онда формуланы орындамаңыз }

I f ( Edit1. Text = ' ') Then Exit;

x:= StrTofloat (Edit 1.Text);

Case

ListBox1. ItemIndex of { Тізімнен таңдалған элементке байланысты }

{ есеп әртүрлі формуламен есептеледі }

0: y:= x/400;

1: y:= x/16380;

2: y:= x/28.35;

3: y:= x/28.35 *16;

4: y:=437.5 *x/28.35;

End;

Memo1.Lines.Add ( formatFloat (' ####. #### Грамм=' , x) +

+ formatFloat(' ####. ####',y)+ListBox1Items[ListBox1. ItemIndex]);

Edit1.Clear; Edit1.SetFocus;

end;

ItemIndex қасиеті тізімнен таңдалған элeмент номерін анықтайды. Clear әдісі Tedit компонентінің мәнін тазартады. Set focus әдісі курсорды осы компонентке қояды;

х және у айнымалыларын сипаттауды ұмытпаңыз.

2.6. Программаны орындауға жіберіңіз. Бірнеше бақылау есептеулерін орындаңыз:

1234 грамм= 3,085 Фунт

1234 грамм=0,07534 Пуд

1234 грамм= 43,52734 Унция

1234 грамм= 696,43739 Драхм

1234 грамм= 19043,20988 Гран

3. Anchors қасиеті:

3.2. Жұмыс істеп тұрған қосымшада терезені үлкейтіңіз. Форманың сол жағындағы < Close> кнопкасының орнына көңіл аударыңыз.

3.3. Қосымшаны жабыңыз. < Close> кнопкасын оң жақ төменгі бұрышқа орналастырайық. Anchors қасиетін қолданамыз. Келісім бойынша (по умолч.) қасиет мәні [aktор, akleft].Қасиетке [akRight, akBottom] мәндерін меншіктейміз. Ол үшін Anchors қасиеті жолының оң жағына белгілейміз: aktор- False, akleft-False,akRight- True, ak Bottom- True.

3.4. Программаны орындауға жіберіңіз және Anchors қасиеті дұрыс қолданылған ба, соны тексеріңіз.

3.5. Төменгі панель өлшемін терезе өлшеміне пропорционал өзгерту үшін Anchors қасиетіне [ aktор, akleft, akRight, akBottom] мәндерін енгіз.

Программаны орындаңыз және терезе өлшеміне сәйкес Panel1 өлшемінің өзгергенін көресіз.

4. TGroupBox компоненті.

4.2. Panel1- ге TGroupBox компонентін қойыңыз және Caption қасиетіне “Редокторды қалыпқа келтіру” мәнін енгіз. Бұл компонент көмегімен функционалдық мәніне сәйкес біріктірілген басқару элементтер тобын белгілеуге болады.