Llenar Combobox

[[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