«Delphi программалау тілі»
Əдебиеттер: [1]-[7], қ[1]-[5]
жүктеу/скачать 1,77 Mb.
|
Delphi программалау тілі
UMK Ci tilinde programmalau (1), Бөлім 2 Объектілік
- Бұл бет үшін навигация:
- Əдебиеттер: [1]-[7], қ[1]-[5]
Əдебиеттер: [1]-[7], қ[1]-[5]Delphi- де басқа қосымшаларды іске қосудың WinExec ShellExecute API- функциялары. Бұл функциялардың жазылу форматы, қолданылу мысалдары. Дельфиге Калькулятор, Паскаль программалын қосу командалары. Delphi қосымшасына Flash –ролик əкеліп қою. Дельфиде Shockwave Flash компонентін орнату. Қосымша заставкасын жасау. ShowModal процедурасы.
Тақырыбы: Деректер массивін түрлендірудің 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:='Йен';
Батырмаларды бірнеше бағанға орналастыру Columns қасиеті қолданылады. Таңдалған батырма индексі ItemIndex қаситеі арқылы анықталады. Бұл құралды қолданып ыңғайлы безендірілген тест программасын жасауға болады. жүктеу/скачать 1,77 Mb. Достарыңызбен бөлісу:
|