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 combobox_cuatrimestres.Items.Text:= a;
end;
1 : begin combobox_cuatrimestres.Items.Text:= b;
end;
end;
end;
Saludos