Цитата:
|
хотя никаких проверок на ее значение не ведется
|
а это что?
Код:
if(value!=FProgress) // допустим fvalue==0 && FProgress==0
{
FProgress=value;
//.............
Paint();
}
при построении объекта нет инициализации FProgress, поэтому вполне возможно, что в памяти он оказывается нулём.
сделайте конструктор
Код:
TExtProgressBar::TExtProgressBar(...) : TProgressBar(...), FProgress(-1) {}
и всё должно заработать. Или добавьте default в описание свойства
