Скачать: CL | DM;

progress bar   Найти похожие ветки 

← →
azot   (2006-10-24 16:45) [0]

каким образом можно заставить прогресс бар  (при нажатии на кнопку) медлено заполняться, и когда заполнится до конца выводица определённый текст и значения прогрес бара сбрасываются?

---

← →
Сергей М. ©   (2006-10-24 16:45) [1]

под пытками

---

← →
Anatoly Podgoretsky ©   (2006-10-24 16:51) [2]

По таймеру, в нем регулируешь степень медленности.
Позиция управляется через одноименное свойство
Вывод текста к этому совсем не относится, но делается многими сотнями способов.

---

← →
azot   (2006-10-24 16:51) [3]

а серьёзно?

---

← →
Elen ©   (2006-10-24 16:52) [4]

> azot

В таймере

---

← →
azot   (2006-10-24 16:53) [5]

а где найти таймер?

---

← →
Джо ©   (2006-10-24 16:54) [6]

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;


---

← →
Elen ©   (2006-10-24 16:55) [7]

> azot

На вкладке System

---

← →
Сергей М. ©   (2006-10-24 16:55) [8]

> а серьёзно?


"медленно" или "быстро" - оно имеет отношение ко времени.
Время (временной интервал) имеет отношение к таймеру.
Дальше будешь чесать репу сам ?)

---

← →
Anatoly Podgoretsky ©   (2006-10-24 16:56) [9]

> а серьёзно?

Думаешь мы шутим, тогда ты сайтом ошибся.

---

← →
azot   (2006-10-24 16:56) [10]

всё, разобрался, спасибо всем!

---

← →
Сергей М. ©   (2006-10-24 16:56) [11]

> Джо ©   (24.10.06 16:54) [6]


Зачет по телепатии ты сдал)

---

← →
Джо ©   (2006-10-24 16:58) [12]

>
>
> [11] Сергей М. ©   (24.10.06 16:56)
>
> > Джо ©   (24.10.06 16:54) [6]
>
>
> Зачет по телепатии ты сдал)

Всего лишь буквально переложил [0] в код :)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.042 c