| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Progress в статус бар формы

Zoom ©   (2005-04-19 20:09:00) 

А как вставить PB в SB в KOL? Что-то не получается, как в VCL.

---

thaddy   (2005-04-19 22:27:00) [1]

explanation: the control is only created when referenced, so you should use at least form.simplestatustext;
The resizeparent is not necessary.

(off_topic)
When I feel lazy and use Babelfish, my posts will arrive two times :) Better learning Russian properly :) Sorry to the webmaster
(end_off_topic)

---

thaddy   (2005-04-19 22:16:00) [2]

procedure NewForm1( var Result: PForm1; AParent: PControl );
begin
 New(Result,Create);
 with Result^ do
 begin
   Form:= NewForm(AParent,'KOLForm').SetSize(600,400).centeronparent.Tabulate;
   Applet:=Form;
   Form.Add2AutoFree(Result);
   Form.simplestatustext:='';
   PB:=NewProgressBar(Form.StatusCtl);
   PB.resizeparent;
   PB.Progress:=50;
 end;
end;

---

Zoom   (2005-04-19 20:44:00) [3]

Yep. I tried it. How to exactly?

---

thaddy   (2005-04-19 20:40:00) [4]

You can use the property statusctl as the owner of the PB! Easy!

---

thaddy   (2005-04-19 20:39:00) [5]

You can use the property statusctl as the owner of the PB! Easy!

---

Наверх