![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
progress bar
azot © (2006-10-24 16:45:00)каким образом можно заставить прогресс бар (при нажатии на кнопку) медлено заполняться, и когда заполнится до конца выводица определённый текст и значения прогрес бара сбрасываются?
Джо (2006-10-24 16:58:00) [1]>
>
> [11] Сергей М. © (24.10.06 16:56)
>
> > Джо © (24.10.06 16:54) [6]
>
>
> Зачет по телепатии ты сдал)
Всего лишь буквально переложил [0] в код :)
Anatoly Podgoretsky (2006-10-24 16:56:00) [2]
> а серьёзно?
Думаешь мы шутим, тогда ты сайтом ошибся.
azot (2006-10-24 16:56:00) [3]всё, разобрался, спасибо всем!
Сергей М. (2006-10-24 16:56:00) [4]
> Джо © (24.10.06 16:54) [6]
Зачет по телепатии ты сдал)
Elen (2006-10-24 16:55:00) [5]
> azot
На вкладке System
Сергей М. (2006-10-24 16:55:00) [6]
> а серьёзно?
"медленно" или "быстро" - оно имеет отношение ко времени.
Время (временной интервал) имеет отношение к таймеру.
Дальше будешь чесать репу сам ?)
Джо (2006-10-24 16:54:00) [7]
procedure TForm1.Button1Click(Sender: TObject);
var
I: Integer;
begin
for I := ProgressBar1.Min to ProgressBar1.Max do
begin
ProgressBar1.Position := I;
Sleep(100);
end;
ShowMessage ('Определенный текст');
ProgressBar1.Position := ProgressBar1.Min
end;
azot (2006-10-24 16:53:00) [8]а где найти таймер?
Elen (2006-10-24 16:52:00) [9]
> azot
В таймере
Anatoly Podgoretsky (2006-10-24 16:51:00) [10]По таймеру, в нем регулируешь степень медленности.
Позиция управляется через одноименное свойство
Вывод текста к этому совсем не относится, но делается многими сотнями способов.
azot (2006-10-24 16:51:00) [11]а серьёзно?
Сергей М. (2006-10-24 16:45:00) [12]под пытками