(現在 過去ログ36 を表示中)

HOME HELP 新規作成 新着記事 トピック表示 ファイル一覧 検索 過去ログ

[ 最新記事及び返信フォームをトピックトップへ ]

■5505 / inTopicNo.1) 　複数行のテキストを読み込みたい
  ▼■
□投稿者/ 前田 -(2010/01/18(Mon) 00:06:02)
    表で任意に作成した複数の行内容を、別の表の１レコードとして改行も含めて読み込みたいのですが、以下の様な方法を試しましたが上手く行きません。
    １行目　りんご
    ２行目　柿
    ３行目　もも
    このデータを２次元バーコード表示を行い、他のソフトで改行コードも含めて処理を行いたいので、TBLの強制改行文字を”。”で試しましたが上手く処理できませんでした。
    複数行のテキストデータを１レコードに読み込む方法でもいいのですが、処理が分かりません。



    手続き定義開始　ｺﾏﾝﾄﾞﾎﾞﾀﾝ_28::ﾏｳｽ左ｸﾘｯｸ(長整数　&マウス位置[2]，長整数　&明細番号，長整数　&フラグ，参照　長整数　&処理中止)
    印字開始　"input-cd.txt"
    繰り返し　( .Not #終端行 )
    印字　[inputcd],”。”,
    ジャンプ　行番号 = 次行
    繰り返し終了
    印字終了
    ジャンプ　行番号 = -1

    変数宣言　固有,文字列,{＆処理行,&SETcd}
    &SETcd=[setcd]
    ファイル入力開始　”input-cd.txt”
    ファイル入力　&処理行
    ファイル入力終了

    ＊表へ書き出し
    書き出し　表,"input-cd",追加,*
    表　"input-cd"
    ジャンプ　行番号＝最終
    行訂正　[bercord]=&処理行
    レポート印刷　”bercord.rpt”,プレビュー＝する
    終了　表　編集対照表
    手続き定義終了

引用返信 [メール受信/OFF] 削除キー/
■5506 / inTopicNo.2) 　Re[1]: 複数行のテキストを読み込みたい
□投稿者/ うにん -(2010/01/18(Mon) 08:55:46)
http://chart.apis.google.com/chart?cht
    > このデータを２次元バーコード表示を行い、他のソフトで改行コードも含めて処理を行いたい

    桐の中で1レコードにする必要はあるんでしょうか？

    > 手続き定義開始　ｺﾏﾝﾄﾞﾎﾞﾀﾝ_28::ﾏｳｽ左ｸﾘｯｸ(長整数　&マウス位置[2]，長整数　&明細番号，長整数　&フラグ，参照　長整数　&処理中止)
    > 印字開始　"input-cd.txt"

    印字を使うなら印字だけでテキストファイルの作成は完了です。

    > ファイル入力　&処理行

    変数に入れたいならファイル入力しないで印字と同時に変数にも入れればいいでしょう。

    > ＊表へ書き出し
    > 書き出し　表,"input-cd",追加,*

    ここで書き出すと対象行が全部出ますが、最初の印字処理では現在行以下しか出してません。どっち？

引用返信 [メール受信/OFF] 削除キー/
■5507 / inTopicNo.3) 　Re[2]: 複数行のテキストを読み込みたい
□投稿者/ 前田 -(2010/01/18(Mon) 10:37:22)
    > 桐の中で1レコードにする必要はあるんでしょうか？
    一つのデータとして2次元バーコード印刷をかけたいので、その内容は「文字データ、改行、文字データ、改行」として持たせたい。


    > 印字を使うなら印字だけでテキストファイルの作成は完了です。
    テキストファイル名を変数にしたらエラーとなりました。
    印字開始　＆てすと

    >
    >>ファイル入力　&処理行
    >
    > 変数に入れたいならファイル入力しないで印字と同時に変数にも入れればいいでしょう。





    >>＊表へ書き出し
    >>書き出し　表,"input-cd",追加,*
    > ここで書き出すと対象行が全部出ますが、最初の印字処理では現在行以下しか出してません。どっち？
    グループ選択状態のフォームですので選択した行だけです。
引用返信 [メール受信/OFF] 削除キー/
■5508 / inTopicNo.4) 　Re[3]: 複数行のテキストを読み込みたい
□投稿者/ 今村　誠 -(2010/01/18(Mon) 14:13:36)
    前田さんこんんちはうにんさん横レスすいません。

    4000文字以内に1行文字列が収まるのであれば
    文字型の作業項目を作り置換が一番簡単ではないですか？
    > 一つのデータとして2次元バーコード印刷をかけたいので、
    > その内容は「文字データ、改行、文字データ、改行」として持たせたい。
    [inputcd]が元文字の項目、[作業文字]という項目を作成し置換式に

    #直前値([作業文字],"")+#強制改行文字+[inputcd]

    とすれば希望の文字にはなります。

    最後に最終行を絞込み印字コマンドを使い

    印字開始　"改行.txt"
    印字　#S(#sstr([作業文字],2),#強制改行文字,"\n")
    印字終了

    履歴に登録しても可能です。
引用返信 [メール受信/OFF] 削除キー/
■5509 / inTopicNo.5) 　Re[4]: 複数行のテキストを読み込みたい
□投稿者/ 前田 -(2010/01/18(Mon) 16:22:38)
    今村さんご無沙汰してます。

    項目の追加と直前値の作業で解決できそうです。
    外部データベースファイルをフォームに組み込んでいましたので、計算式項目の追加が出来ないので、考え込んでいました。
    随時表へ追加していき、入力完了後に印刷処理に移行するように変更してみます。

    ありがとうございました。


引用返信 [メール受信/OFF] 削除キー/
■5513 / inTopicNo.6) 　Re[1]: 複数行のテキストを読み込みたい
□投稿者/ eo -(2010/01/18(Mon) 20:36:21)
引用返信 [メール受信/OFF] 削除キー/


トピック内ページ移動 / << 0 >>

このトピックに書きこむ

過去ログには書き込み不可

Mode/　 Pass/

HOME HELP 新規作成 新着記事 トピック表示 ファイル一覧 検索 過去ログ

- Child Tree -
- Antispam Version -