掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
関数を外部ファイル化して、使うには？ (ID:36513)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
クラスメソッドにしなさい。 procedure TForm1.Button1Click(Sender: TObject); var s : TMyShow; begin s := TMyShow.Create; s.ShowM('生成して呼び出し'); s.Free; TMyShow.ShowM('生成しないで呼び出し'); end; ----------------------------------------- unit MyShow; interface uses Dialogs; type TMyShow = class(TObject) private { Private 宣言 } public { Public 宣言 } class procedure ShowM(const ss: string); // クラスメソッド end; implementation class procedure TMyShow.ShowM(const ss: string); begin ShowMessage(ss); end; end.
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.