掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
コントロール"は親ウィンドウを持っていませんというエラーを止めるには? (ID:29517)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ぐは!これは見たくない長さのソースだ(^^ゞ 配列 FOwnerDrawButton の宣言は? FOwnerDrawButton :array[1..100] of TOwnerDrawButton; のように、 確実に「FilesCount:=100」で使用しているだけの要素数確保してある? また、宣言してある場所は? 自分なら、とりあえず、FOwnerDrawButtonあたりが、うさんくさそうなので、 以下のあたりでエラーを捕まえてみる。 > if Assigned(FOwnerDrawButton[I])=False then > begin > FOwnerDrawButton[I]:=TOwnerDrawButton.Create(self); > FOwnerDrawButton[I].Parent:=FishEyeView; > FOwnerDrawButton[I].Font.Size:=12; > FOwnerDrawButton[I].Caption:=IntToStr(I); > end; try > FOwnerDrawButton[I].Height:=34; > FOwnerDrawButton[I].Width:=34; except ShowMessage(FOwnerDrawButton[I].Caption); end; ここでダメなら、FOwnerDrawButtonのサイズ、位置を変更しているとこを 片っ端から try〜except で囲んで、場所がわかるようにメッセージ表示するよ。 上から ShowMessage('1');ShowMessage('2'); ・・・のように。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.