![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Здрасте! Я что-то не могу понять логику этого.
Например: Код:
property Position : Cardinal read FPosition write SetPosition default 0; ... procedure <Компонент>.SetPosition(Value : Cardinal) ; begin if Value > FMax then FPosition:= FMax else FPosition := Value ; Invalidate ; end ; Что-то я не могу понять логики. |
#2
|
||||
|
||||
![]() Значение свойства хранится в поле класса FPosition. Чтобы изменить ее значение использовуется процедура SetPosition, параметром которой является новое значение.
Можно было написать Код:
property Position : Cardinal read FPosition write FPosition default 0; Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |