掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
なぜかTstringsって使いにくいようなきがすのですが・・・ (ID:20635)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
お世話になります。 type TmyColorBOX=class(TcolorBOX) protected procedure CreatMENU(); public constructor creat(Tobjct);override; end; Tmainform=class(Tform) ColorBOX1:TcolorBOX; end; var MycolorBOX:TmyColorBOX mainform:Tmainform; procedure Tmainform.creat( begin Mycolorbox:=TmyColorBOX.creat(self); ColorBOX1.items:=Mycolorbox.items; end; constructor TmyColorBOX.creat begin self.CreatMENU; end; Procedure TmyColorBOX.CreatMENU() begin AddItem('OrgColor',$00FDFDFD); end; ようするにカラーボックスのアイテムをフォームに貼り付けてあるカラーボックスにTmyColorBOXのアイテムを代入したいのですが、エラーがでるのです。 「親ウィンドウを持っていない」とかなんやら。（コンパイルはできますが、実行ができません） もちろん、フォームに貼り付けたカラーボックスに mainform Tmainform.creat bgin colorbox1.addItem('OrgColor',$00FDFDFD) end; とやればエラーはま逃れるのですが・・・。 僕がTstringsを使おうとうるといっつもエラーになるのでタイトルこんなのにしました。質問の内容はTstringsとは関連するだけですが・・・。関係ないかも？ それにTstrings.creatをすると警告がなりますし・・・。 何か基本的なことを教えてくれるようなサイトなどあれば教えてください。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.