Delphi tilida

Windows, Messages, SysUtils, Variants, Classes, Graphics, 
Controls, Forms, 
Dialogs, StdCtrls; 

Buttonl: TButton; 
Button2: TButton; 
Memol: TMemo; 
Labell: TLabel; 
ComboBoxl: TComboBox; 
procedure FormCreate(Sender: TObject); 

92 

end; 
var 
Forml: TForml; 
a:Array[1..10] of integer; 
k,i,maxx,minn:Integer; 
sl,s2:String; 
implementation 
{$R*.dfin} 
procedure TForml.ButtonlClick(Sender: TObject); 
begin 
ComboBoxl.Items. Add(ComboBoxl.text); 
i:=i+l; 
a [i]:=StrToInt(ComboBoxl.text); 

begin 
i:=0; 

minn:=a[l]; 
maxx:=a| 11; 
For k:=l to 10 do 
Begin 

93 

end; 
End. 

4.5.StringGrid jadval komponentasi 

Options —jadvad holatini aniqlaydi (aniqlash uning parametrlariga 

asosan bajariladi, masalan GoEditing parametr true qiymatiga ega 
bo‘lsa yacheykani tahrirlash mumkin, aks holda mumkin emas. Bu 
parametrlami aniqlash uchun Options xossasiga o‘tib. u ikki marta 
tez-tez bosiladi); 
ColWidths —jadvaldagi har bir ustun kengligini aniqlaydi; 
DefaultColWidth —jadvalning boshlang‘ich ustunlar kengligini 
aniqlaydi; 
DefaultRowHeight —jadval satrining boshlang‘ich balandligini 
aniqlaydi; 
FixedColor —fiksirlangan yacheyka rangini aniqlaydi; 
RowHeiohts —jadval satri balandligini aniqlaydi; 
Cells —simvol qatorli ikki olchamli massivni aniqlaydi. 
M i s o 16. 
Butun qiymatli A(4,4) massiv elementlari yig‘indisi va o‘rta 
armfmetik qiymati topilsin. 

94 

Demak, hosil qilinadigan jadval 4 ta ustun va 4 ta satrga ega.
Option xossasiga kiramiz va uni ikki marta tez-tez chiqillatamiz. 
U yerdan GoEditing parametrini True qiymatga tenglashtiramiz. 
4.Bottonl tugmasining Coption xossasiga kirib, uning nomini 
«Yechish» nomiga o ‘zg artiram iz. 
5.«Yechish» tugmasini aktivlashtiramiz, ya’ni, uni ikki marta tez- 
tez bosib dastur kodlarini yozish oynasiga o‘tamiz va quyidagi kodlami 
kiritamiz: 

end; 

6.Tuzilgan loyiha (npoeK T) ya’ni Projectl va Unitl standart modul 

nomlarini mos nomlar bilan almashtirib saqlaymiz. 

95 

7.Yangi nom bilan saqlangan proyekt, ya’ni ilova F9 tugmachasini 
bosish bilan ishga tushiriladi. 
Ilova ishga tushirilganda uning quyidagi ko‘rinishi ekranda 
namoyon boladi. 
Tashkil qilingan modulning to‘liq ko‘rinishini keltiramiz: