[maectpo]

Следующая ситуация.
Нужно смоделировать Доменный процесс(Металлургия). Суть вопросы в следующем. В одной форме вводиться кол-во подачь( то сколько раз будет вводиться руда в начале плавки), после ввода колличества подачь(они вводяться с помощью ComboBox, т е выбираются из списка), в зависимости от того сколько будет введено (от 1 до 6) становяться видимыми еще несколько ComboBox (от 1 до 6) в которых выбирается вид руды ( всего 4 варианта Кокс, Агломерат, Окатыши, Флюсы), так же становяться видимыми рядом с соответствующим ComboBox соответствующий Edit в который вводиться кол-во тонн того или иного компонента. так вот надо что в другой форме отображалось в зависимости от выбора пользователя следующее: допустим пользователь выбрал 4 подачи следующего типа Агломерат - 2 тонны, Кокс-3 тонны, Окатыши - 1 тонна и еще раз Агломерат - 4 тонны. в открывшейся форме должно отобразиться следуещее "Подача агломерата 4 тонны", через некоторое время, "подача кокса 3 тонны", через тоже время "подача Окатышей 1 тонна", и еще через это же время "подача Агломерата 4 тонны", надо что отображалось все через один и тот же промежуток времени допустим через минуту, и с новой строки, причем весь предыдущий текст должен оставаться то есть в конце будет четыре строки. и еще это все должно повторяться допустим 10 раз, а так же пользователь в любое время может изменить кол-во подачь и их состав, и в случаи изменения должна появиться надпись "Подача изменена".

[Страдалецъ]

Киньте на форму компонент TTimer настройте его срабатывание каждую минуту и наслаждайтесь результатом.

[maectpo]

а можно поподробнее особенно о том какой компонент добавить на вторую форму что бы в нем выводились строки. и протаймер

[Страдалецъ]

После того как поместите TTimer на форму установите в нем значение Interval = 60000, что соответствует 1 минуте. И выставите значение Enabled = True. Теперь с периодичность в 1 минуту у вас будет вызываться событие OnTimer в котором вы просто организуете вывод в (видимо в мемо) ваших данных думаю будет где-то так:

Код:

procedure TForm24.Timer1Timer(Sender: TObject);
begin
 case ComboIndex
 of 1: Memo1.Lines.Add(ComboBox1.Text);
     2: Memo1.Lines.Add(ComboBox2.Text);
     3: Memo1.Lines.Add(ComboBox3.Text);
     4: Memo1.Lines.Add(ComboBox4.Text);
 end;
 Inc(ComboIndex);
 if ComboIndex > 4 then ComboIndex := 1;
end;

переменную ComboIndex сделайте глобальной и инициализируете при создании формы.

[maectpo]

при исполнение вашего кода делфи ругается на ComboIndex и как активировать таймер по нажатию кнопки?

Заранее спасибо, ваши ответы полные и подробные

[maectpo]

Спасибо разобрался, все заработало.
Но возникаеи вопрос который я уже писал, если пользователь изменит колличество подачь то поидеи должно измениться Case of с 4 допустим до 6! как можно это реализовать, кнопка об изменении находиться на этой же форме
Заранее Спасибо!