Delphi tilida

A E l 
11 Trtltln : fnn rfhf 
H 11 L ll * 1” MJ 
;[L0- 1b-sj 

_1 
X 
y 
D 

* 

t t W t 
- 

-----------i---------------------------- A 

Table oynasida x va y maydonlariga misolda keltirilgan ulaming 
qiymatlarini kiritamiz. Bu qiymatlami ilova tuzilgandan so‘ng kiritsa
ham bo'ladi. 
Endi tuzilgan MBni boshqarish uchun ilova y a yaratishga kirishamiz. 
1.Delphi tizimini ishga tushirib BDE komponentalar palitrasidan 
Ttable komponentasini formaga joylashtiramiz. 
2.Formadagi Ttable komponentasi uchun, DataBase Name 
xossasida Mbning psevdonimini aniqlaymiz. 

270 

11.Menyudan File=>Save Project A t As buyrugini berib, oldin forma 
keyin loyihani saqlaymiz. 
12.Loyihani ishga t a tushirish uchun F9 tugmasini bosamiz. Natijada, 
quyidagi formaga ega bolamiz. 

-P Fonjil 

3 


1 Jk 
H 


rD6Q™i 
_■_■.__l' 
j/ 

40 

7 
25 

9 

» 

10 

Bu oynada berilgan funksiyaning jadval qiymatlari o‘zgarsa grafik

ham mos ravishda o‘zgaradi. 
Kompyuter quyidagi dastur kodlarini avtomatik ravishda tuzadi: 
Unit Funk; 
interface 
uses 
Windows, Messages, SysUtils, Variants, Classes, Graphics, 
Controls, Forms, 
Dialogs, Grids, DBGrids, DB, DBTables, StdCtrls, TeEngine, 
Series, 

271 

end;
var 
Forml: TForml; 
implementation 
{$R *.dfm} 
end. 

M i s o 12. Yuqoridagi o‘qituvchilar haqidagi MBdan foydalanib, 

o‘qituvchilar ish haqining gistogrammasini quring. 
Y e c h i s h 
1.Yuqoridagi o‘qituvchilar haqidagi MB uchun tuzilgan ilova
loyihasini ekranga yuklaymiz. 
2.Formaga grafikni joylash uchun yuqorida keltirilgan grafikni
qurish algoritmidan foydalanamiz. 
3.Loyihani ishga tushiramiz va natijada quyidagi ishchi formaga 
ega bolamiz. 

qdijvchilar haqida ma'lumotnoma 

mdoJfam-c 

(tyx 

OMk 

p- 1 •lcnnvL'
Riw DSAIftrtW 

— 
137 SdbwUmmtQn 

138 ZulfwcTv 2olaf]on 
139 utmoflflw Sc*rt 
140 Atwn+ikji/ Srfob 
141 
k d m 
1SODOO 
w 
100000 
n r tw 

Formada baza ma’lumotlarining o‘zgarishi mos ravishda grafik
o‘zgarishlariga ham olib keladi. 

272