Пішін ќасиеттері



бет14/29
Дата06.01.2022
өлшемі0,65 Mb.
#11847
түріПрограмма
1   ...   10   11   12   13   14   15   16   17   ...   29
Байланысты:
konspekt Delphi

Property Font : TFont - компонентте көрінетін текст түрін анықтайды.

Property Visible : Boolean - компоненттің экранда көрінуін анықтайды.
Сабақ тақырыбы: ‘Label’, ‘Button’ компоненттерін қолданып

Психологиялық тест программасын құрастыру.


Сабақ мақсаты: ‘Label’, ‘Button’ қасиеттері мен әдістерін программалауды үйрену.

Айнымалылардың көрсіну аумағын ұғыну.

Тармақталған алгоритмді қолдану дағдысын қалыптастыру.
Теориялық бөлім.
TLabel (метка) компоненті пішінге түсініктеме жазулар шығару үшін қолданылады. Негізгі қасиеті: Caption. Font қасиеті арқылы шрифт түрін таңдауға болады.

Tlabel қасиеттері



type TAlignment = (taLeftJustify, taRightJustify, taCenter) ; property lignment:

Тексті туралау (AutoSize=False болған жағдайда): taLeftJustify -солға; taRightJustify – оңға, taCenter - ортаға

property AutoSize: Boolean;

Caption қасиетіне тексті енгізу барысында көлемі өзгере ме екенін анықтайды

property Transparent: Boolean;

Егер True болса Tlabel компонентінде фон болмайды.

property Wordwrap: Boolean;

wordwrap=True болса көп жолды текст енгізуге болады.

TButton компоненті программаны басқаруда, OnClick уақиғасын программалауда кеңінен қолданылады.

TButton қасиеттері



property Cancel: Boolean;

Егер True болса , OnClick уақиғасы Esc пернесін басқанда пайда олады.

property Default: Boolean;

Егер True болса , OnClick уақиғасы Enter пернесін басқанда пайда олады.

property Wordwrap: Boolean;

wordwrap=True болса көп жолды текст енгізуге болады.

‘Label’, ‘Button’ компоненттерін қолданып психологиялық тест программасын құрастыру керек.


Шешу жолы:

Ол үшін бізге 2 айнымалы керек және ол айнымалылар бүкіл процедурада көрінуі үшін біз оны

Public бөлімінде хабарлаймыз.

public s,k : integer;

s – «Иә» жауаптарын есептеу үшін,

k – «Сұрақты енгізу» батырмасын басқанда k-ға 1 қосылып отырады.

k:=k+1;

if k=1 then label1.Caption:='Сіз өтірік айтасыз ба?';

if k=2 then label1.Caption:='Сіз өсек айтасыз ба?';

if k=3 then label1.Caption:='Өзіңізге ұнайтын адамның қасында ыңғайсыздық сезінесіз бе?';

if k=4 then label1.Caption:='Әдепсіз бола аласыз ба?';Психологиялық сұрақтар:
s – «Иә» жауаптарының санына байланысты зерттеу нәтижесі:
label2.Caption:='Психологиялық зерттеу нәтижесінде айқындалғаны';

if s=0 then label1.Caption:='Сіз қу адамсыз';

if s=1 then label1.Caption:='Сіз айлакерсіз';

if s=2 then label1.Caption:='Сіз кәдімгі адамсыз';

if s=3 then label1.Caption:='Сіз кәдімгі адамсыз';

if s=4 then label1.Caption:='Сіз кіршіксіз шынайы адамсыз';


Практикалық жұмыс.






Достарыңызбен бөлісу:
1   ...   10   11   12   13   14   15   16   17   ...   29




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

    Басты бет