Главная страница Случайная страница
КАТЕГОРИИ:
АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника
Секция Baggage.
|
|
Data Files батырмасы Ms HW тірізеден диалог терезесі ашылады, файлдың анық талуы, іздеу кітапханасыда пайдалынады. Осы файалдардың тізімі [Baggage] секциясын жоба файлын сақ тайды.
Delphi-де программалау элементтері
1. Тармақ талу командасы. RadioButton компоненті.
Тармақ талу командасының қ ысқ а жә не толық нұ сқ алары бар. Олардың жазылу тү рлері Турбо Паскальдағ ы сияқ ты:
1) if P then S //қ ысқ а нұ сқ а
2) if P then S1 else S2 //толық нұ сқ а
мұ ндағ ы P– шарт; S, S1, S2- орындалуы тиіс сериялар (бір блоктық операторлар). Егер блок бірнеше операторлардан тұ рса, олар бір қ ұ рама оператор ретінде қ арастырылып, begi – end операторлық жақ шылардың ішіне жазылады:
If P then begin
S1
End
Else begin
S2
End;
Блокқ а енгізілген оператор тек біреу болса, оны операторлық жақ шаларғ а алу міндетті емес.
Мысал. RadioButton компоненттерін пайдаланып, геометриялық фигуралардың аудандарының формулалары жө нінде анық тамалық программа қ ұ ру керек.
1. Жаң а жоба ашу. Формағ а Memo1, RadioButton1, …RadioButton4, BitBtn1, BitB2 компоненттерін орнату. (1 - сурет).
RadioButton - байланысты ауыстырып қ осқ ыш компонент. Формада оның кемінде екеуі орнатылуы тиіс. Олар Checked қ асиеті арқ ылы анық талатын тек екі кү йде болуы мү мкін: True жә не False. жоба іске қ осылып, кө рінген формада қ ай ауыстырып қ осқ ыш шертілсе (Check қ асиетіне True мә ні меншіктелсе), программада осығ ан сә йкес программа бө лімі орындалады.
1 - сурет Калькулятор ү шін дайындалғ ан
2. Компоненттер қ асиеттеріне мә ндер меншіктеу:
| Компонент | Қ асиет | Мә н |
| Form1 RadioButton1 RadioButton2 RadioButton3 RadioButton4 BitBtn1 BitBtn2 | Caption Font Caption Caption Caption Caption Kind Kind | Геометрия-анық тамалық Tmes Kaz, 11 Ү шбұ рыш Тіктө ртбұ рыш Дө ң гелек Трапеция BkOK BkClose |
3. ОК батырмасын екі рет шертіп, батырманың OnClickоқ иғ асын ө ң деуіш процедурасын қ ұ ру:
Procedure Tform1.BitBtn1Click(Sender: TObject);
Begin
If RadioButton1.Checked then
Begin Memo1.Lines.clear;
Memo1.Lines.Add(S=ah/2);
Memo1.Lines.Add(‘a – ү шбұ рыш табаны, h - биіктігі’);
End;
If RadioButton2.Checked then
Begin Memo1.Lines.clear;
Memo1.Lines.Add(S=ab);
Memo1.Lines.Add(‘a – тіктө ртбрыш табаны, b- биіктігі’);
End;
If RadioButton3.Checked then
Begin Memo1.Lines.clear;
Memo1.Lines.Add(S=Pi*r*r);
Memo1.Lines.Add(‘r- дө ң гелек радиусы, Pi – 3, 14’);
End;
If RadioButton4.Checked then
Begin Memo1.Lines.clear;
Memo1.Lines.Add(S=(a+b)*h/2);
Memo1.Lines.Add(‘a, b – тіктө ртбрыш табаны, h- биіктігі’);
End;
End;
4. Жобаны сақ тап, - іске қ осу. Кө рінген формадан қ ажетті фигураның атауын таң дап, ОК батырмасын шерту. Мысалы, «Трапеция» қ атарындағ ы ауыстырып-қ осқ ыш орнатылса, ө рісінде нә тиже кө рінеді (1-сурет).
