Delphi丼

よく使うプロパティ
※名前順の上から解説

◆CharCase
    ○コンボボックス内のテキストの大文字小文字を設定します
        ・ecNormal        変換しない
        ・ecLowerCase    小文字に変換
        ・ecUpperCase    大文字に変換

◆DropDownCount
    ○ドロップダウンリストに表示される項目の最大数を指定します

◆ItemIndex
    ○ドロップダウンリストのどの項目が選択されているかを示します
        ・未選択　＝　-1
        ・１行目　＝　 0(ZERO)

◆Items
    ○ドロップダウンリストの項目（文字列）のリストを表示します
    ○Textとは何が違うのか
        ⇒ Textはドロップダウンリストの「表示されている」項目の値
        　 Itemsはドロップダウンリストの値の集合体


◆Sorted
    ○ドロップダウンリストの項目の値を昇順にします
    ○ソート優先度 ： 数字(半角 ＞ 全角) ＞
                      英字(半角 ＞ 全角)※大文字小文字はｿｰﾄされない ＞
                      全角日本語(カタカナ ＞ ひらがな)　＞
                      漢字
    　※正確なソートがほしい時は自分でソート処理を組んだ方が良い。 →Exchange

◆Style
    ○コンボボックスの表示スタイルを指定します
        ・csDropDown        →    入力可のリストボックス
        ・csDropDownList    →    入力不可のリストボックス

◆Text
    ○編集ボックスに表示されるテキスト文字列を指定します


基本イベント
//================================================
// コンボボックスの項目の初期化
//================================================
procedure TForm1.BtnComboBoxClearClick(Sender: TObject);
begin
  //初期化する
  ComboBox1.Clear;
end;


//================================================
// コンボボックスの項目の追加
//================================================
procedure TForm1.BtnComboBoxAddClick(Sender: TObject);
begin
  ComboBox1.Items.Add('Delphi');    //ItemIndex = 0
  ComboBox1.Items.Add('Java');        //ItemIndex = 1
  ComboBox1.Items.Add('PLSQL');        //ItemIndex = 2

  //初期表示に「Delphi」を表示
  ComboBox1.ItemIndex := 0;

end;

//================================================
// コンボボックスの項目の割り込み追加
//================================================
procedure TForm1.BtnComboBoxAddClick(Sender: TObject);
begin
  //ItemIndex = 0に項目を追加する。ItemIndexは再振り分けされる
  ComboBox1.Items.Insert(0,'VB');

end;


//================================================
// コンボボックスの項目の変更
//================================================
procedure TForm1.BtnComboBoxDeleteClick(Sender: TObject);
begin
  //ItemIndex = 1 の項目を変更
  ComboBox1.Items[1] := 'C++';

end;


//================================================
// コンボボックスの項目の削除
//================================================
procedure TForm1.BtnComboBoxDeleteClick(Sender: TObject);
begin
  //ItemIndex = 1 の項目を削除。ItemIndexは再振り分けされる
  ComboBox1.Items.Delete(1);

end;


//================================================
// コンボボックスの項目の追加
// ※ Memoに入力された値を一括追加
//================================================
procedure TForm1.BtnComboBoxClearClick(Sender: TObject);
begin
  //TStrings型（MemoやStringList）が追加できる
  ComboBox1.Items.AddStrings(memo1.Lines);
end;


※とりあえず保存