Текущий архив: 2004.12.05;
Скачать: CL | DM;

Вниз

Image1.onprogress   Найти похожие ветки 

← →
denis24   (2004-11-17 11:59) [0]

Почему когда я в сабже пишу
if stage=psStarting then
begin
       frmProgress:=TfrmProgress.Create(self);
       frmProgress.ShowModal;
end
else if stage=psRunning then
           frmProgress.ProgressBar1.Position:=PercentDone;
else if stage=psEnding then
frmNew_priyom.Free;

Приложение виснет?

---

← →
Gloomer ©   (2004-11-17 12:40) [1]

попробуй вставить  Application.ProcessMessages после
frmProgress.ProgressBar1.Position:=PercentDone;

---

← →
Amoeba ©   (2004-11-17 12:55) [2]

Если показывается модальная форма, то пока она не будет закрыта, выполнение приложения будет приостановлено. А вообще из приведенного кода мало что понятно.
В каком все-таки месте "виснет"?

---

← →
Rem ©   (2004-11-17 13:20) [3]

Виснет на строке frmProgress.ShowModal; по причине, указанной в [2]. Используйте frmProgress.Show;.

---

← →
denis24   (2004-11-17 13:29) [4]

Спасибо помогло!
Еще вопрос.Как у формі frmprogress убрать заголовок вообще?

---

← →
Amoeba ©   (2004-11-17 13:33) [5]

BorderStyle := bsNone

---

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

Текущий архив: 2004.12.05;
Скачать: CL | DM;

Наверх

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