掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
LIstBoxでチェックボックスを表示する方法について (ID：47134)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
XE7.1でFMXでWindowsアプリで試しています。 リストボックスの使い方についてお教えいただけませんでしょうか。 リストボックスのアイテムにチェックボックスをつけたいのですが、 以下のコードだと最初の見た目はチェックボックスが見えません。 一度スクロールさせて画面から見えなくなったものは、 スクロールさせて戻すとチェックボックスが見えるようになります。 使用方法に誤りがあるのでしょうか。 ご教授いただけませんでしょうか。 よろしくお願いします。 procedure TForm1.Button1Click(Sender: TObject); var i : integer; item : TListBoxItem; begin //リストをクリア ListBox1.Clear; try ListBox1.Items.Clear; ListBox1.ShowCheckboxes := true; ListBox1.BeginUpdate; for i := 0 to 20 do begin item := TListBoxItem.Create(ListBox1); item.StyleLookup := 'listboxitemnodetail'; item.ItemData.Accessory := TListBoxItemData.TAccessory(0); item.Height := 44; item.Text := 'Name' + IntToStr(i); if odd(i) then item.IsChecked := true; ListBox1.AddObject(item); end; finally ListBox1.EndUpdate; end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.