PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
20226 03/09/01 18:05:01 RE(5):PB6.5: 解決しました。 By teruteru70528
20223 03/09/01 15:21:26 RE(4):PB6.5: テキストファイルの内容をマルチラインエディットに出力する時間を短縮したい By teruteru70528
20222 03/09/01 11:21:56 RE(3):PB6.5: テキストファイルの内容をマルチラインエディットに出力する時間を短縮したい By teruteru70528
20220 03/08/29 19:05:26 RE(2):PB6.5: テキストファイルの内容をマルチラインエディットに出力する時間を短縮したい By M.M
20217 03/08/29 11:29:48 RE(1):PB6.5: テキストファイルの内容をマルチラインエディットに出力する時間を短縮したい By M.M
20210 03/08/28 12:04:02 PB6.5: テキストファイルの内容をマルチラインエディットに出力する時間を短縮したい By teruteru70528

カテゴリ:スクリプトの記述
日付:2003年08月28日 12:04 発信者:teruteru70528
題名:PB6.5: テキストファイルの内容をマルチラインエディットに出力する時間を短縮したい

テキストファイルの内容をマルチラインエディットに出力しています。
テキストファイルは2MBあり、画面に出力されるまで8分30秒ほどかかってしまいます。
環境とスクリプトの記述は以下のようになっております。スクリプトの記述で良い方法があれば
教えて頂けないでしょうか。このくらいの時間はかかってしまうのであればしょうがないと
思うのですが、どうも時間がかかりすぎのような感じがするので。

(環境)
CPU:Pentium4  2.4Ghz
MEMORY:512MB

(スクリプト)
lReadSts = FileRead(iLog,sLogbuf)
DO UNTIL lReadSts = -100 
         Kekka = Kekka + sLogbuf + \"~r~n\"
         lReadSts = FileRead(iLog,sLogbuf)
LOOP
Kekkaにテキストの内容を格納して画面をOPENするときに
としています。
gamen.Text = Kekka

ちなみにテキストはLineModeでopenしています。StreamModeでopenして
読み込んだ内容を画面に出力しようとすると改行コードがない状態で
表示されてしまうためです。

どなたかご教授ください。

どなたかご教授ください。


付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows 2000
DBMS Oracle SQL*Net 8
Browser (記載なし)

Server SoftWare

OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)

PowerSpaceの運営は、パワーフューチャー株式会社が行っております。
Copyright © 2013 Power Future Co., Ltd.