Изменять дание на форме з ShowModal();

[Lokki23]

Возникла такая проблема создаю форму

TForm *Form2;
Form2 = new TForm(this);
TProgressBar *Bar = new TProgressBar(this);
Bar->Parent = Form2;
Form2->ShowModal();

и тепер хочу изменить позицию в Bar->Position++;
Но она не меняется

если делаю

TForm *Form2;
Form2 = new TForm(this);
TProgressBar *Bar = new TProgressBar(this);
Bar->Parent = Form2;
//цикл
Bar->Position++;
Form2->ShowModal();

то все работает но при заполнении Бара у меня есть доступ до главной форми .

Вот так как зделать чтобты Бар заполнялся но доступа до главной форми не било при заполнении.

Заранее благодарен

[Stilet]

ShowModal замени на Show(). Тогда будет ок. Это для начала. А вообще это немного по другому делается.

[Lokki23]

Да но если я напишу Show() то при заполнении Бара можна будет изменять и пользиватся основной формой

[FataLL]

1) Можно перенести цикл в Form2
2) Можно из Form2 обращаться к некоей функции Form1, которая делает одну или несколько итераций цикла
3) Можно создать отдельный поток для цикла, который бы самостоятельно, через Synchronize апдейтил ползунок Form2

[evg_m]

установить для нее Enable =false
и не забыть потом ее включить!

[Lokki23]

Харшая идея нащот переноса цикла в Form2 но цикл очень велик и он создает много елементов на форме 1 и перенос его в форму2 мне кажется будет не очень умно. Переробативать цикл не очень хочу. Сделаю форме Enable В следующирй раз буду думать наперед.
Всем спасибо за помощ!!!

[Stilet]

А что программа делает, что такие сложности с ее механикой возникли?

[Lokki23]

Програма создания розписания пар .Есть база даних которая состоит из 4 таблиц. У меня есть PageControl в котором создаются листы - название специальностей на которих уже название груп и комбобокси для вибора пар. Все ето я сделал реализовал вибор 1 учителя на только одну пару . Вот и зделел ету полосу ну для красоти так сказать.
Да ещо зделаю сохранение в файл. Ну и так по мелачам.

А да просто я передвигаю ползунок етого ПроцБара в середине самого цикла уже после создания ComboBox-ов а там у меня куча циклов ну для создания самих комбо боксов для 1 групи 20 штук ище подпись (1.2.3.4.пара) и тд.