Mavzu:“ “Oddiy arifmetika trenajori” loyihasi

3: Edit1.Font.Color:=ClBlue;

End;

10.ClickListBox1 komponentasi maydonini ikki marta tez tez bosamiz va paydo bo’lgan kodlarni kiritish maydoniga qayidagi kodlarni kiritamiz.

If CheckListBox1.Checked[0]

Then Edit1.Font.Style:=Edit1.Font.Style+[FsStrikeOut]

Else Edit1.Font.Style:=Edit1.Font.Style-[FsStrikeOut];

If CheckListBox1.Checked[1]

Then Edit1.Font.Style:=Edit1.Font.Style+[FsUnderLine]

Else Edit1.Font.Style:=Edit1.Font.Style-[FsUnderline];

11.Tuzilgan loyiha (proekt) ya’ni Project1 va Unit1 standart modul nomlarini mos nomlar bilan almashtirib saqlaymiz.

12.Yangi nom bilan saqlangan proekt, ya’ni ilova F9 tugmachasini bosish bilan ishga tushuriladi.

Ilova ishga tushirilganda uning quyidagi ko’rinishi ekranda namayon bo’ladi. Endi ilova bilan ishlash mumkin.

Tashkil qilingan modulning to’liq ko’rinishini keltiramiz.