Macro/投稿/14
をテンプレートにして作成
Land.to
[
ホーム
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
]
開始行:
* ファイルを閉じないで、名前を付けて保存 [#j117448f]
-ページ: [[Macro/投稿]]
-作者: [[じゅうじ]]
-カテゴリー: ppa
-投稿日: 2004-01-02 (金) 17:47:40
** メッセージ [#c904ffc0]
#code(pascal){{
// 実行には PPA.DLL が必須です。sakura.exe と同じフォルダ...
// PPA.DLL を入れておいてください。
// また、マクロファイルの拡張子は .PPA でなくてはなりませ...
// SAVEREOPEN.PPA
// ファイルを閉じないで、名前を付けて保存
var
sa, ss: String;
begin
sa := InputBox('一時保存ファイル名','ファイル名','');
if sa = '' then Exit;
ss := S_ExpandParameter('$F');
S_FileSaveAs(sa,0,0);
S_FileOpen(ss);
end.
// このマクロ何に使うのかと、関心の有る方は[ふぁんくらぶ ...
}}
----
#comment
終了行:
* ファイルを閉じないで、名前を付けて保存 [#j117448f]
-ページ: [[Macro/投稿]]
-作者: [[じゅうじ]]
-カテゴリー: ppa
-投稿日: 2004-01-02 (金) 17:47:40
** メッセージ [#c904ffc0]
#code(pascal){{
// 実行には PPA.DLL が必須です。sakura.exe と同じフォルダ...
// PPA.DLL を入れておいてください。
// また、マクロファイルの拡張子は .PPA でなくてはなりませ...
// SAVEREOPEN.PPA
// ファイルを閉じないで、名前を付けて保存
var
sa, ss: String;
begin
sa := InputBox('一時保存ファイル名','ファイル名','');
if sa = '' then Exit;
ss := S_ExpandParameter('$F');
S_FileSaveAs(sa,0,0);
S_FileOpen(ss);
end.
// このマクロ何に使うのかと、関心の有る方は[ふぁんくらぶ ...
}}
----
#comment
ページ名: