Необходима помощь
На форме имеется три компонента Edit1, ProgressBar1, Timer1.
В едите лежит число 5.5. Пишу
procedure TForm1.Timer1Timer(Sender: TObject);
begin
ProgressBar1.Position := StrToInt(Edit1.Text);
end;
Упорно не хочет работать. Где я ошибаюсь?
|