コンボボックス (ID:2247)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 質問の具体的な内容がわからないので、具体的にどうするかと聞かれても答えようがありません。 たとえば、Form1のprivateにTStringListの変数を用意し、 private strlist: TStringList; OnCreateで、オブジェクトを作成、 strlist := TStringList.Create; OnDestroyで削除、 strlist.Free; します。 後は、使いたいときに使えばOKです。 値を入れるのであれば、 var NO, NAME: String; begin .... strlist[NO] := NAME; でstrlistに、NO=NAMEという値が入ります。 NOに対応するNAMEを使いたいときは、 NAME := strlist[NO]; とすれば、NAMEに入ります。 NOに対応する文字列がない場合は、NAME:='';と等価です。