Delphi tilida

2 ! 0 0 5 (1 0 0 
3 1 U 0 i r 0 1 

6 u 0 u ! ! 0 i 

Bu massivdan tashqari o‘tilgan shaharlar nomerlarini o‘z ichiga 

oluvchi road (yollar) massivi va incl (include —qo‘shish) massividan 
foydalanamiz. Agar i nomerli shahar marshrutiga kiritilgan bo‘lsa 
inci[i] ga true qiymatini yozamiz. 

>!-.H II .nl ill ■■I I b-,V1l I 

E . 1 r i i i i 
- 

_

SoslaLvioVili iHK|t,i 

So'lH|l llll<|tO 

l7kisll 

178 

Xaritani tasvMovchi massivni kiritish uchun stringGridl komponen- 
tasidan foydalanamiz. Natijalami chiqarish uchun Labell maydoni 
marshrut boshi va oxirini ko‘rsatishi uchun Editl va Edit2 maydonlari 
ishlatiladi. Izlash protsedurasi Izlash (Buttonl) tugmasini bosish bilan 
chaqiriladi. Label2, Label3 i Label4 maydonlari izoh uchun ishlatiladi. 
StringGridl komponentasi xossalarining qiymatlari: 

Xossa 

Qiymat 

Name 
ColCount 
RowCount 
FixedCols 
FixedRows 
Options . goEditing 
DefaultColWidth 
DefaultRowHeight 
TRUE 

interface 
uses 
Windows, Messages, SysUtils, Classes, 
Graphics, Controls, Forms,