вопрос с combobox

[awde]

Здравствуйте, не понимаю по какому принципу можно связать 2 ComboBox так чтобы при выборе из списка combobox1 выпадал соответствующий список в combobox2. И еще вопрос мне нужно запустить дополнительный отсчет времени после основного. Как пример: Идет время работы, после его завершения начинается отсчет времени отдыха. При чем время работы и таймера различны

[FaTaL]

По первому вопросу

case ComboBox1.ItemIndex of
0 : begin
ComboBox2.Items.Add ('Значение1);
ComboBox2.Items.Add ('Значение2);
ComboBox2.Items.Add ('Значение...N);
end;
1; begin
ComboBox2.Items.Add ('Значение1);
ComboBox2.Items.Add ('Значение2);
ComboBox2.Items.Add ('Значение...N);
end;
// и так далее

на счет времени отдыха не понял суть вопроса, но думаю, что тут Вам TTimer в помощь.

[awde]

смотрите я уже использую таймер. Мне нужно сделать так чтобы после того как один таймер прекращал работу запускался еще один таймер с заданным временем.

А с первый спасибо

[FaTaL]

Ну после того как завершиться обработка перкого таймера сделайте Timer1.Active := false; Timer2.Active := true; и всё.

[awde]

проблема выходит с эти вариантом. Получается что список отображается только после предварительного запуска с ошибкой программы. И прежний список остается при выборе следующего по списку

а я чет не подумал над этим

[FaTaL]

Сообщение от awde

проблема выходит с эти вариантом. Получается что список отображается только после предварительного запуска с ошибкой программы. И прежний список остается при выборе следующего по списку

Приводи свой код. Ты что-то неправильно делаешь.

[awde]

case ComboBox1.ItemIndex of
0 : begin
ComboBox2.Items.Add ('текст');
ComboBox2.Items.Add ('текст');
ComboBox2.Items.Add ('текст');
ComboBox2.Items.Add ('текст');
ComboBox2.Items.Add ('текст');
end;
1: begin
ComboBox2.Items.Add ('текст');
ComboBox2.Items.Add ('текст');
ComboBox2.Items.Add ('текст');
end;
2: begin
ComboBox2.Items.Add ('текст');
ComboBox2.Items.Add ('текст');
ComboBox2.Items.Add ('текст');
end;
end;
if ComboBox1.ItemIndex=0 then
case combobox2.ItemIndex of
0: begin min:=44;sec:=60; end;
1: begin min:=44;sec:=60; end;
2: begin min:=30;sec:=60; end;
3: begin min:=89;sec:=60; end;
4: begin chas:= 2; min:=59;sec:=60; end;
5: ShowMessage('текст');
end;
if ComboBox1.ItemIndex=1 then
case combobox2.ItemIndex of
0: min:=36;
1: min:=36;
2: min:=23;
end;

остальную часть не стал брать

[FaTaL]

Это что такое?

if ComboBox1.ItemIndex=0 then
case combobox2.ItemIndex of
0: begin min:=44;sec:=60; end;
1: begin min:=44;sec:=60; end;
2: begin min:=30;sec:=60; end;
3: begin min:=89;sec:=60; end;
4: begin chas:= 2; min:=59;sec:=60; end;
5: ShowMessage('текст');
end;
if ComboBox1.ItemIndex=1 then
case combobox2.ItemIndex of
0: min:=36;
1: min:=36;
2: min:=23;
end;

[awde]

в зависимости от какой пункт выбран в 1 combobox, и выбран во 2 зависит время которое таймер отсчитывает

[FaTaL]

Таймер не работает с часами и минутами, а только с миллисекундами. Ты лучше скажи, что именно тебе надо, а мы постораемся помочь.