掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
初期化されてないのエラーメッセージ (ID：21946)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ActiveControl が設定されていない場合、LblEdit も道連れの「可能性がある」という警告だと思います。 ActiveControl ではなくSender を使います。 procedure TMain.Re(Sender: TObject); var LblEdit: TLabeledEdit; begin if Sender is TLabeledEdit then begin LblEdit := TLabeledEdit(Sender); with InputGamen.LabeledEdit1 do begin MaxLength:= LblEdit.MaxLength; EditLabel.Caption:= LblEdit.EditLabel.Caption; Text:= LblEdit.Text; end; end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.