Урок 10 – Представяне на компонентите (част 1
Здравейте мили приятели! В този десети урок започваме подробно запознаване с компонентите. Ще има общо 11 урока по тази тема. В този урок ще се запознаем с компонентите в разделаСтандартен.
Отваряме Delphi и хвърляме компонентEditвъв формуляра. Този компонент има свойствоТекст. Всичко, което е написано в това свойство, се показва в самияEdit'e. Почистете свойствотоТекст.
Следващият компонент, който се появява в нашия формуляр точно надEdit'om, се наричаLabel. Този компонент е подпис за други компоненти. Също така е удобно да се покаже някаква динамична информация в него. Нека запишем стойносттаResult =в свойствотоCaption.
Друг компонент, от който се нуждаем, е бутон, т.е.Button. Поставяме го подEdit'om.
Сега нека напишем проста програма, която ще работи с тези компоненти. Програмата се нарича "Калкулатор". Можете да наименувате съответно заглавието на формуляра. В нашия калкулатор липсва друг компонентРедактиране, моля, поставете го под първата редакция.
Можете да видите общия изглед на калкулатора на екранната снимка.
Сега, след като приключихме с настройването на компонентите, нека се потопим в кода и да създадем манипулатора на събитиеButton1Click. В него пишем код, който ще добави номерата на първата редакция и втората. Надявам се, че няма нужда да обяснявате какво еIntToStrи с какво се яде.
След компилирането въвеждаме числото10в първата редакция и5във втората и след натискане на бутона виждаме, че етикетът показваРезултат = 15. Това означава, че програмата работи и събира числа правилно, а ако работи, изисква съвършенство.
Опитвамдобавяне на дробни числа в нашата програма. Нищо няма да излезе от това, тъй като преобразуваме стойността от редакциите в числовия типInteger, а той работи само с цели числа. Ако все пак сте опитали, вероятно сте видели подобна грешка:
Той просто съобщава, че типътIntegerне може да работи с дробни числа. Но как да бъдем?! Какво да правя? Но тези, които четат уроците добре знаят, че типътRealработи с цели и дробни числа. За да преобразувате стойността от редакцията в типаReal, трябва да промените операторитеIntToStrиStrToIntсъответно наFloatToStrиStrToFloat.
В резултат на това ще получим следния код: След това учим програмата да изважда, умножава и дели. За да направите това, поставете четири компонентаRadioButtonвъв формуляра и променете тяхното свойствоCaptionнаAdd,Subtract,multiply,Divide.
Можете да видите компонентаRadioButtonна уебсайтове или в други програми, това е кръг (тъмен или светъл, в зависимост от избора) и етикет за този кръг до него. Този компонент има свойствоChecked. Може да приема стойноститеTrueилиFalse, което определя избора на радио бутона. Задайте свойствотоCheckedнаTrueза бутона за избор с имеAdd.
Общ изглед на програмата:
Сега трябва да променим кода в събитиетоButton1Click. Ще работи по следния начин: ако е избран радиобутонът „Добавяне“, добавяме, ако е избран радиобутонът „Изваждане“, изваждаме. И по-нататък по аналогия.
Код: Компилирайте и опитайте! Работи за мен ;)
В следващия урок ще надграждаме калкулатора, така че, моля, запазете проекта на сигурно място.
Е, ето гоВсичко! Късмет! Ще се видим в следващия урок!
Източник: www.thedelphi.ruАвтор: Александър СавелиевПубликуван: 9 август 2012 г.Преглеждания: 31585