掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
コントロールの動的生成について (ID：49562)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
抜けてた procedure TForm4.Button1Click(Sender: TObject); var S: String; begin RegisterClasses([TButton]); S := 'TBUTTON'; with S.Create(Self) do begin Parent := Form4; Width := 150; Height := 30; Left := 100; Top := 100; Caption := 'BUTTON'; //TControl にCaption が無い為 Formに設定される end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.