フォーラム


ゲスト  

ようこそ ゲスト さん。このフォーラムに投稿するには 登録が必要です。

ページ: [1]
トピック: PascalScript (Delphi XE2 以降)
DEKO
管理者
投稿数: 2690
PascalScript (Delphi XE2 以降)
on: 2013/04/10 13:29 Wed

XE2 には FastScript というタブが ありまして。FastScript は FastReports の機能の一部なのですが、単体で使う事も可能です。

1.VCL フォームアプリケーションを新規作成して、ボタンと fsScript と fsPascal を貼り付けます。

2.以下のようなコードを記述します。

procedure TForm1.Button1Click(Sender: TObject);
begin
with fsScript1 do
begin
Lines.Clear;
Lines.Add('begin ');
Lines.Add(' ShowMessage(''Hello!World.'')');
Lines.Add('end. ');
Parent := fsGlobalUnit;
SyntaxType := 'PascalScript';
if Compile then
Execute
else
ShowMessage(ErrorMsg);
end;
end;

 
3.実行し、ボタンを押下します。すると、このような実行結果と相成ります。

FastScript のスクリプトエンジンは Pascal 以外にも切り替えることができます。


  • Pascal
  • C++
  • JavaScript
  • Basic
  •  
    お好きな言語でどうぞ (Delphi 使いなら Pascal 一択なのでしょうが、アプリケーションの機能をスクリプトを介してユーザに公開するのであれば話は変わってきますからねぇ)。

    See Also:
    [FastScript のドキュメント]
    http://www.fast-report.com/pbc_download/fs_en.pdf

    ページ: [1]
    WP Forum Server by ForumPress | LucidCrew
    バージョン: 1.7.5 ; ページロード: 0.029 sec.