* マクロを指定回数繰り返し実行 [#sa74b756]
-ページ: [[Macro/投稿]]
-作者: [[すい]]
-カテゴリー: ppa
-投稿日: 2003-10-18 (土) 05:49:35
** メッセージ [#l169c59c]
#code{{
// 実行には PPA.DLL が必須です。sakura.exe と同じフォルダに PPA.DLL を入れておいてください。
// マクロファイルの拡張子は .PPA でなくてはなりません。
// マクロを実行する回数を入力するダイアログを出し、
// そこで指定された回数マクロを実行する。
var
cnt,max:Integer; // 整数数値型変数 cnt と max を用意する
begin
max := StrToInt( InputBox('マクロ実行','マクロを実行する回数を入力して下さい。','') );
for cnt := 1 to max do
begin // {
// ここに指定回数実行したい内容を書き込む
S_InsText( IntToStr(cnt) + '回目の文字列出力です。');
S_Char(13); // 改行する
end; // }
end;
}}
----
#comment