掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
関数名を引数とする関数? (ID:148612)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
関数名を引数とする関数? は一応できるよ procedure TForm1.X; begin Caption := 'XXXX'; end; function TForm1.Y: String; begin RESULT := '22'; end; function TForm1.Z(A:TFunc<String>): String; begin Result := A; end; procedure TForm1.Button1Click(Sender: TObject); var P: TProc; F: TFunc<String>; begin P := X; F := Y; P; Caption := Caption + F; Caption := Caption + Z(Y); Exit; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.