掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
関数を別Formでも使用するには (ID：8922)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
FormBからFormAの関数を呼び出すところはできているのでしょうか。 FormBにある関数を呼んでしまっているのでしょうか。 前者であれば、FormAにある関数の中で、FormAのメンバを直接操作していませんか？関数の中からFormAのメンバを直接操作せず、FormAのインスタンスを引数に渡して、そのインスタンスから操作するようにしておけば、FormBから呼び出してもOKです。 たとえば、 function TFormA.GetMemoText: String; begin Result := Memo1.Lines.Text; // フォームに張ってあるMemo1からテキストを取得 end; と会った場合、FormBから呼び出しても「FormAのMemo1からテキストを取得」ということになります。 function TFormA.GetMemoText(Sender: TForm): String; begin if Sender Is TFormA then Result := (Sender As TFormA).Memo1.Lintes.Text else if Sender Is TFormB then Result := (Sender As TFormB).Memo1.Lines.Text; end; とすれば、SenderがFormAの場合FormAのMemo1から取得するし、SenderがTFormBであれば、FormBのMemo1から取得します。 後者であれば、FormA.FuncNameというように、「FormAの」関数を呼び出してください。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.