Əдебиеттер: [1]-[7], қ[1]-[5]
Delphi- де басқа қосымшаларды іске қосудың WinExec ShellExecute API- функциялары. Бұл функциялардың жазылу форматы, қолданылу мысалдары. Дельфиге Калькулятор, Паскаль программалын қосу командалары.
Delphi қосымшасына Flash –ролик əкеліп қою. Дельфиде Shockwave Flash компонентін орнату.
Қосымша заставкасын жасау. ShowModal процедурасы.
Əдебиеттер: [1]-[7], қ[1]-[5]
6- апта.
1 кредит сағат.
Тақырыбы: Деректер массивін түрлендірудің Combobox, ListBox компоненттері. RadioGroup радиобатырмалар тобы компоненті .
Дəріс мазмұны:
Дəріс мазмұны:
ListBox компоненті, қасиеттері, əдістер.
Combobox компоненті, қасиеттері, əдістер.
RadioGroup компоненті, қасиеттері
Таңдау операторы бірнеше əрекеттің ішінен таңдауға мүмкіндік береді. Таңдау операторының құрылымы: Case <өрнек> of
<таңдау тізімі> [else <оператор>] end;
ListBox жəне ComboBox компоненттері жолдар тізімінен тұрады. ListBox компоненті ашық түрдегі тізімді бейнелейді, ал ComboBox компоненті жиналмалы түрдегі, төмен қарай ашылатын тізімнен тұрады. Екі компоненттің де жолдар тізімінен тұратын TStrings типті Items қасиеті болады. Тізімнен таңдалған элементтің индексі ItemIndex қасиеті арқылы көрсетіледі. Ол 0-ден бастап бүтін сандармен нөмірленеді. Егер ешқандай элемент таңдалмаса, онда ItemIndex қасиетінің мəні -1-ге тең болады.
сурет.
Мысал1. Паскаль тіліндегі бүтін типтердің аты жазылған тізімнен таңдалған типке сəйкес қабылдайтын мəндер аралығын шығаратын қосымша жасаңдар.
сурет. Шешуі:
procedure
TForm1.ListBox1Click(Sender: TObject); begin
case listBox1.ItemIndex of 0:edit1.Text:='[0..255]';
1:edit1.Text:='[-128..127]';
2:edit1.Text:='[-32768..32767]';
3:edit1.Text:='[-2147483648..-2147483647]';
4:edit1.Text:='[0..65535]'; end; end;
Төмендегі суретте қосымшаның орындалу нəтижесі көрсетілген.
сурет.
Мысал2. Əр елдің аты жазылған тізімнен, таңдалған мəнге байланысты сол елге сəйкес ақша бірлігінің атауын шығаратын қосымша жасаңдар.
сурет.
Программа коды:
procedure
TForm1.ListBox1Click(Sender: TObject); begin
Case listbox1.ItemIndex of
0:edit1.Text:='Фунт';
1,2,5,6,10:edit1.Text:='Евро';
3:edit1.Text:='Рупий';
4:edit1.Text:='Крон';
7:edit1.Text:='Юан';
8:edit1.Text:='Туглик';
9:edit1.Text:='Доллар';
11:edit1.Text:='Франк'; 12:edit1.Text:='Йен';
end; end;
RadioGroup компоненті- радиобатырмалар тобының панелі. Мұнда радиобатырмалар жол жəне баған бойынша орналасады. Панельдің сол жақ жоғарғы бұрышындағы жазу Caption қасиеті арқылы анықталады. Батырмалар сан Items қасиеті арқы таңдалады.
Батырмаларды бірнеше бағанға орналастыру Columns қасиеті қолданылады. Таңдалған батырма индексі ItemIndex қаситеі арқылы анықталады. Бұл құралды қолданып ыңғайлы безендірілген тест программасын жасауға болады.
Достарыңызбен бөлісу: |