Delphi визуалды программалау ортасы


-сурет 2. «Кездейсоқ таңдау» батырмасын тышқанмен шерткенде үш сөзден тұратын кездейсоқ сөйлем құрау. 16-сурет



бет78/98
Дата07.02.2022
өлшемі1,51 Mb.
#85980
1   ...   74   75   76   77   78   79   80   81   ...   98
Байланысты:
Delphi

15-сурет

2. «Кездейсоқ таңдау» батырмасын тышқанмен шерткенде үш сөзден тұратын кездейсоқ сөйлем құрау.



16-сурет

3. Бағдарламадан шығу үшін тышқанмен тақырып жолындағы жабу батырмасын шерту қажет.


Бағдарламаны іске асыру жоспарының сипаттамасы


1. Жаңа жоба ашу.
2. Пішінге мына компоненттерді: тізімі бар үш ComboBox өрісін, Button батырмасын орналастыру.
3. Мына кестедегі әрекеттерді орындау:
7 - кесте

Белгі-ленген нысан

Object Inspector терезесінің астары

Қасиеттің аты/ Оқиғаның аты

Атқарылатын әрекет

Form1

Properties

Caption

Пішінге «Сөйлем құраушы» атын орнату

Events

OnCreate

ComboBox1.ItemIndex :=0;
ComboBox2.ItemIndex :=0; ComboBox3.ItemIndex :=0;

ComboBoxl
(Standard астары)

Properties

Style

Ашылатын тізімнен cSDropDownList мәнін таңдаңыз

Items

Құрушы батырманы шертіңіз. Сонда String List Editor (Жолдар тізімінің редакторы) терезесі ашылады. Әр жолға бір-бірден тізім пункттерін енгізіп, оның соңынан Enter-ді басып отырыңыз. Тізім дайын болған соң ОК батырмасын шертіңіз.




ComboBox2
(Standard астары)

Properties

Style

Ашылатын тізімнен cSDropDownList мәнін таңдаңыз

Items

Құрушы батырманы шертіңіз. Сонда String List Editor (Жолдар тізімінің редакторы) терезесі ашылады. Әр жолға бір-бірден тізім пункттерін енгізіп, оның соңынан Enter-ді басып отырыңыз. Тізім дайын болған соң ОК батырмасын шертіңіз.

ComboBox3
(Standard астары)

Properties

Style

Ашылатын тізімнен cSDropDownList мәнін таңдаңыз

Items

Құрушы батырманы шертіңіз. Сонда String List Editor (Жолдар тізімінің редакторы) терезесі ашылады. Әр жолға бір-бірден тізім пункттерін енгізіп, оның соңынан Enter-ді басып отырыңыз. Тізім дайын болған соң ОК батырмасын шертіңіз.

Buttonl
(Standard астары)

Properties

Caption

Батырмаға «Кездейсоқ таңдау» атын орнату

Events

OnClick

ComboBox1.ItemIndex := Random(ComboBox1.ItemIndex); ComboBox2.ItemIndex := Random(ComboBox2.ItemIndex); ComboBox3.ItemIndex := Random(ComboBox3.ItemIndex);

4. Жобаны сақтаңыз, оны іске қосып орындалуын тексеріп көріңіз.




Достарыңызбен бөлісу:
1   ...   74   75   76   77   78   79   80   81   ...   98




©engime.org 2024
әкімшілігінің қараңыз

    Басты бет