掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
複数のユニットを使用するには? (ID:15132)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
グローバル変数を使用したくないなら関数や手続きで 値のやり取りをしないといけませんね。 Form1からForm2に値を渡したいのなら Form2は Privateに IntData :Integer; Publicに Procedure SetIntData(i :Integer); ほんで procedure TForm2.SetIntData(i :Integer); begin IntData := i; end; Form1は implementation 節に Form2をUsesして (ファイルからユニットを使うで選択したら自動で入ります) procedure TFrom1.Button1OnClick(Sender :TObject); begin From2.SetData(100); end; などとすば、如何でしょうか。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.