ThashStringListを結合するには

解決

サンプー 2006-04-13 18:58:52 No: 21012

いつもお世話になります。
comboboxを３つおいて、それぞれにitemを入れています。
THashStringListをcreateし、assignメソッドで夫々のcomboboxのitemは独立して取得できています。この独立した夫々のItemを結合して、１つのTHashStringListを作成したいのですが、方法が判りません。どなたかご教示下さい。
try
    SLMakerName := THashedStringList.Create ;
    SLMakerName.Assign(CombMakerName.Items);
    SLPopular := THashedStringList.Create ;
    SLMakerName.Assign(Combpopular.Items);
    SLGrade := THashedStringList.Create ;
    SLMakerName.Assign(CombGrade.Items);

中略

finally
    SLMakerName.Free ;
    SLPopular.Free ;
    SLGrade.Free ;
end;

igy 2006-04-13 19:19:39 No: 21013

TComboBoxのitemsプロパティにあるリストの内容を１つずつ、
THashedStringListのAdd メソッド（あるいはAddObject メソッド）で追加する

でどうですか？

おぶじぇくと蒸 2006-04-13 20:31:51 No: 21014

文字列だけなら、
try
   SLTotal := THashedStringList.Create;
   SLTotal.Text := ComboBox1.Items.Text + ComboBox2.Items.Text + ComboBox3.Items.Text;
   Memo1.Lines.Assign(SLTotal); // 確認
finally
   SLTotal.Free;
end;

kkk 2006-04-13 20:44:15 No: 21015

もっと簡単に・・・
THashedStringListはTStringsから派生しているのでAddStringsで一発OK
SLx.AddStrings(SL1);
SLx.AddStrings(SL2);
SLx.AddStrings(SL3);

サンプー 2006-04-14 20:31:51 No: 21016

igyさん、おぶじぇくと蒸さん、kkkさんありがとうございました。kkkさんの方法ですんなり解決できました。