Macro/投稿/82
をテンプレートにして作成
Land.to
[
ホーム
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
]
開始行:
* 固定長テキストデータを改行 [#g14442c9]
-ページ: [[Macro/投稿]]
-作者: [[じゅうじ]]
-カテゴリー: ppa
-投稿日: 2006-05-12 (金) 04:12:50
** メッセージ [#l37304ab]
#code(pascal){{
// タイトル:固定長テキストデータを改行
// LEFT_DOWN.PPA
// マクロを実行前に、カーソルを
// 最初に改行させたい位置に置きます。
// あらかじめ途中に改行の有るデータはそこまでで終了します。
var s1, s2 : String;
begin
while True do
begin
S_Char(13);
S_Left();
s1 := S_ExpandParameter('$x');
S_Down();
s2 := S_ExpandParameter('$x');
if StrToInt(s1) <> StrToInt(s2) then
break; // EOFか、または全角文字で終わる。
end;
end.
// index to >>Part7:23
}}
----
#comment
終了行:
* 固定長テキストデータを改行 [#g14442c9]
-ページ: [[Macro/投稿]]
-作者: [[じゅうじ]]
-カテゴリー: ppa
-投稿日: 2006-05-12 (金) 04:12:50
** メッセージ [#l37304ab]
#code(pascal){{
// タイトル:固定長テキストデータを改行
// LEFT_DOWN.PPA
// マクロを実行前に、カーソルを
// 最初に改行させたい位置に置きます。
// あらかじめ途中に改行の有るデータはそこまでで終了します。
var s1, s2 : String;
begin
while True do
begin
S_Char(13);
S_Left();
s1 := S_ExpandParameter('$x');
S_Down();
s2 := S_ExpandParameter('$x');
if StrToInt(s1) <> StrToInt(s2) then
break; // EOFか、または全角文字で終わる。
end;
end.
// index to >>Part7:23
}}
----
#comment
ページ名: