掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ほかのユニットにデータを渡すときに、コンポーネント以外にわたしたいのですが？ (ID:15303)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Form2にプロパティを持たせたいと言うことでしょうか。 {Form2の定義に追加} private function GetEditText: String; procedure SetEditText(Value: String); public property EditText: String read GetEditText write SetEditText; {上に定義した２関数の実体} function TForm2.GetEditText: String; begin Result := Edit1.Text; end; procedure TForm2.SetEditText(Value: String); begin Edit1.Text := Value; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.