掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
XPManでListViewの項目が表示されなくなる (ID:27546)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
お世話になります。 また、お力添えをいただければと思います。 ListViewを使用したプログラムで、XPManを有効にした途端にListViewの 項目が表示されなくなりました。 XPManを無効(削除)すると正常に表示します。 簡単なテストプログラムでテストしてみました。 { ListView ・・・ OwnerData := True; OwnerDraw := True} procedure TForm1.Button1Click(Sender: TObject); begin ListView.Items.Clear; FSL.Clear; end; procedure TForm1.Button2Click(Sender: TObject); var i :Integer; begin for i := 0 to 10 do begin FSL.Add(IntToStr(i)); ListView.Items.Add; end; end; procedure TForm1.FormCreate(Sender: TObject); begin FSL := TStringList.Create; end; procedure TForm1.FormDestroy(Sender: TObject); begin FSL.Free; end; procedure TForm1.ListViewData(Sender: TObject; Item: TListItem); begin Item.Caption := FSL.Strings[Item.index]; end; XPManが無効なら項目名は表示されますが、有効な場合は項目が 表示されません。 何か足りないのか? 私の環境だけなのか? 何か解決策なりご存知の方がおられましたらご教授いただければ 幸いです。 D2006 XP SP2
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.