掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TListItem.DropTarget の描画 (ID：151763)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
いつもお世話になっています。 ヘルプでは「DropTarget プロパティを true に設定すると，リストビューのその他のすべての項目の Default プロパティが false に設定されます。」 とあるのですが、他のアイテムのターゲット状態が戻りません。 もともとは、The Drag and Drop Component Suite for Delphi 「DropFileTarget.OnDragOver」内での動作だったのですが、 最小限にするために TListView と TListBox のみでテストしています。 procedure TForm1.FormCreate(Sender: TObject); var i:integer; begin ListView1.ViewStyle:=vsReport; for i:=0 to 9 do begin ListView1.Items.Add.Caption:=IntToStr(i); ListBox1.items.Add(IntToStr(i)); end; end; procedure TForm1.ListBox1Click(Sender: TObject); begin ListView1.Items[ListBox1.ItemIndex].DropTarget:=True; end; ↓が希望の描画です var i:integer; begin for i:=0 to ListView1.Items.Count - 1 do ListView1.Items[i].DropTarget:=i=ListBox1.ItemIndex; ちなみに TTreeView の場合は全く問題なく希望通りの描画になります。 問題が、Delphi 側なのか OS のメッセージなのか確認するため、 LVIS_DROPHILITED を直接送ってみたりもしましたが変化ありませんでした。 なにか情報をお持ちでしたらお教えください。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.