Macro/投稿/82

http://sakura.qp.land.to/?Macro%2F%C5%EA%B9%C6%2F82


Top > Macro > 投稿 > 82

固定長テキストデータを改行

  • ページ: Macro/投稿
  • 作者: じゅうじ?
  • カテゴリー: ppa
  • 投稿日: 2006-05-12 (金) 04:12:50

メッセージ

  0
  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
// タイトル:固定長テキストデータを改行
// 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


URL B I U SIZE Black Maroon Green Olive Navy Purple Teal Gray Silver Red Lime Yellow Blue Fuchsia Aqua White

リロード   新規 編集 凍結 差分 添付 複製 名前変更   ホーム 一覧 単語検索 最終更新 バックアップ リンク元   ヘルプ   最終更新のRSS
Last-modified: 2006-07-30 (日) 00:56:47 (4282d)