Дістемелік кешені


ShowMessage(FloatToStr(s))



бет33/43
Дата07.01.2022
өлшемі1,39 Mb.
#17102
түріПрограмма
1   ...   29   30   31   32   33   34   35   36   ...   43
Байланысты:
UMKD Obektige ba 1171 yttal 1171 an programmalau 2014 KAZ (1)

ShowMessage(FloatToStr(s));

Немесе ShowMessage(FloatToStr(s, ffgeneral,7,3));


Жүйе соңғы операторды оқып шығып , жеті цифрдан тұратын нақты санды символдық типте шығару терезесінде көрсетеді.

Мысал. X=4,8 үшін y=2x+5/3 функциясының мәнін есептеу керек. Х мәні InputBox терезесі арқылы енгізілсін, у мәні ShowMessage терезесінде көрсетілсін.


1.File/New Application командасын беріп, жаңа проект ашыңыз. Form 1 терезесі көрінеді.

2.Форманы екі рет шертіңіз. Unit1.pas атаулы модуль құрылады да, код терезесінде OnCreate оқиғасын өңдеуіш процедурасының дайындамасы көрінеді 1-сурет.



1-сурет.Программалық код терезесі.



3.Келесі программаны енгізіңіз:

Бұл – форманы екі рет шерту (OnCreate) оқиғасына сәйкес жазылған оқиғаны өңдеу процедурасы.


4.Іске қосу: Run немесе F9 клавишін басыңыз.

5. Терезеге 4,8 мәнін енгізіп, ОК түймесін басыңыз 2-сурет:




2-сурет. Мән енгізу.


41


6.Нәтижесі 3-суретте көрсетілген:

3-сурет. Нәтиже.
Тапсырма 1. Процедураға ShowMessage(FloatToStr(s, ffgeneral,7,3)); операторын енгізіп, программаны іске қосыңыз.

Тапсырма 2. Мысалды TEdit, Tlabel,TButton компоненттері арқылы келесі процедураны қойып орындаңыз:



Достарыңызбен бөлісу:
1   ...   29   30   31   32   33   34   35   36   ...   43




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

    Басты бет