掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
初期化されてないのエラーメッセージ (ID：21945)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
TLabeledEditを数個配置し、夫々にTagナンバーをつけて、どのTLabeledEditをクリックしても下記したTMain.Reで作業をおこなう。 そこで、どのTLabeledEditがクリックされたのかをｘで取得して、そのクリックされたTLabeledEditの情報を、作業用として設けた別のTLabeledEditに転記しようとしました。 下記ソースでコンパイルすると「LblEditは初期化されてない」のメッセージが出ます。実行結果は問題ないようなのです。 どのように初期化すればよいのでしょうか？ procedure TMain.Re(Sender: TObject); var x: TWinControl; LblEdit: TLabeledEdit; begin x:= ActiveControl; LblEdit.Tag:= x.Tag; InputGamen.LabeledEdit1.MaxLength:= LblEdit.MaxLength; InputGamen.LabeledEdit1.EditLabel.Caption:= LblEdit.EditLabel.Caption; InputGamen.LabeledEdit1.Text:= LblEdit.Text; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.