Llenar Combobox

[naty_prog]

Hola amigos, les quiero comentar que necesito rellenar un combobox (combobox_cuatrimestres) con distintos items de acuerdo a la selección de otro combobox (combobox_tipo),por medio de código fuente.
Al comenzar el programa, tengo el combobox_tipo en donde se encuentra las opciones 'anual' y 'cuatrimestral'. de acuerdo a lo que seleccione, en el combobox_cuatrimestres, si el usuario elijió 'anual', debe aparecer en la lista desplegable del combobox_cuatrimestres 1,3,5,7 (uno abajo del otro), si fuese que el usuario elige la opción 'cuatrimestral' del combobox_tipo, en el combobox_cuatrimestres, deben aparecer en la lista desplegable los items 1,2,3,4,5,6,7,8.
Aquí se me presenta el dilema: en el evento OnChange del combobox_tipo, realizo el filtro, utilizando la sentencia if para que el programa realice la comparación entre si el usuario elijió anual o cuatrimestral. el problema es cómo armo la línea de código para las dos opciones.
Estuve leyendo temas anteriores sobre rellenar combobox pero no me queda bien claro.
La línea sería algo como esto:

if (combobox_tipo.item.text:='anual') then
comcobox_cuatrimestres.items.add (//aquí es donde no se como seguiría la línea);
espero haberme expresado de manera eficiente para que puedan resolver mi problema y ayudar a otras personas que estén en la misma situación.
Saludos a todos y muchas gracias.

[[Caral]]

Hola

Código Delphi [-]
combobox_cuatrimestres.Clear;
  case combobox_tipo.ItemIndex of
     0 : begin
          combobox_cuatrimestres.Items.Add('1');
          combobox_cuatrimestres.Items.Add('3');
          combobox_cuatrimestres.Items.Add('5');
          combobox_cuatrimestres.Items.Add('7');
         end;
     1 : begin
          combobox_cuatrimestres.Items.Add('1');
          combobox_cuatrimestres.Items.Add('2');
          combobox_cuatrimestres.Items.Add('3');
          combobox_cuatrimestres.Items.Add('4');
          combobox_cuatrimestres.Items.Add('5');
          combobox_cuatrimestres.Items.Add('6');
          combobox_cuatrimestres.Items.Add('7');
          combobox_cuatrimestres.Items.Add('8');
         end;
end;

Tambien se puede con salto de carro, pero no me acuerdo, tendria que pensarlo mas.
Saludos

[naty_prog]

Debido a que tengo poco tiempo para dedicarle a la tesis que estamos armando con mi compañero, la ayuda que nos dan desde este foro nos viene muy bien, ya que nos esforzamos por pensar distintas formas de darle soluciones a nuestros problemas de programación, sumado a la poca experiencia con el lenguaje delphi.
Les agradezco sinceramente la ayuda que nos brindan.Muchas gracias.Saludos

[[Caral]]

Hola
La verdad me gusta mas con salto de linea:

Código Delphi [-]
var a,b:string;
begin
  combobox_cuatrimestres.Clear;
  a:= '1'+chr(13)+'3'+chr(13)+'5'+chr(13)+'7';
  b:= '1'+chr(13)+'2'+chr(13)+'3'+chr(13)+'4'+chr(13)+'5'+chr(13)+'6'+chr(13)+'7'+chr(13)+'8';
  case combobox_tipo.ItemIndex of
  0 : begin //Anual
      combobox_cuatrimestres.Items.Text:= a;
      end;
  1 : begin //Cuatrimestre
      combobox_cuatrimestres.Items.Text:= b;
      end;
  end;
end;

Saludos

[naty_prog]

agradezco tus soluciones.saludos