如何拆分这串字符,并且把个项加到ComboBox里~

Question

我有一串字符:
a,b,c,d,e,f我想把这些字符拆分开
然后把
a
b
c
d
e
f
作为ComboBox的的列表选项[items]请高手指教,菜鸟不胜感激~~

Answer 1

虽然这么写没有什么技术含量，但我觉得简单易懂……procedure TForm1.Button1Click(Sender: TObject);
var s:string;
begin
    s:='a,b,c,d,e,f';
    while pos(',',s)>0 do
    begin
        ComboBox1.Items.Add(copy(s,1,pos(',',s)-1));
        s:=copy(s,pos(',',s)+1,length(s));
    end;
     ComboBox1.Items.Add(s);
end;