HSPTV!掲示板

スレッド一覧 | 新規書き込み | 新着一覧 | 使い方 | 過去ログ

未解決

解決

停止

削除要請


	2012 1128	DDA	インストーラーみたいに文字を流したい	7

DDA

2012/11/28(Wed) 04:23:24|NO.50928

何かをインストールする時
詳細ボタンなどを押すと
データーが書き込まれる様子が文字で見れますよね
そのように文字をズラーっと流して表示してみたいのですが
どうすればいいのでしょうか

この記事に返信する

甘酒

2012/11/28(Wed) 05:16:19|NO.50929

こういう事かな？
保存しないで実行しちゃうとドキュメントに作られるから注意してくださいね。



repeat 11
redraw 0
color 255,255,255:boxf:color 0,0,0
pos 0,0
mkdir "ディレクトリ" + cnt
mes "ディレクトリ" + cnt + "を作成しました"
redraw 1
await 100
loop

命令の意味が分からなかったらヘルプを確認してください。

甘酒

2012/11/28(Wed) 05:18:57|NO.50930

ああ、後蛇足かもしれないけどmkdirはファイルパス指定もできるよ
mkdir "newfile//ディレクトリ"+cnt
こうすればnewfileの中に作られる。
必ずexist命令でファイル有り無を確認するか、ファイルを作らないとエラーになるよ。

DDA

2012/11/28(Wed) 19:03:50|NO.50936

すみません・・説明不足でした・・・

ファイルではなく文字だけを表現してみたいのです

http://www.hi-fi-net.com/blog/upload_images/0000/0043/06.png
↑の文字が流れる部分です

@key

2012/11/28(Wed) 19:57:14|NO.50938

こんな感じですかね？

#define EM_SETSEL $b1
#define EM_REPLACESEL $C2

sdim s,1000
mesbox s,300,100,0:hEdit = objinfo(stat,2)

repeat
sendmsg hEdit,EM_SETSEL,strlen(s),-1
sendmsg hEdit,EM_REPLACESEL,0,"MessageTest:"+rnd(500)+"\n"
wait 10
loop

ここのスクリプトを少し改変しただけです
http://hsp.tv/play/pforum.php?mode=pastwch&num=11716

@key

2012/11/28(Wed) 19:58:37|NO.50939

あれ？ preをつけたはずなのに反映されてない？

てすと

自分の打ち間違いです　すいません

@key

2012/11/28(Wed) 20:02:15|NO.50940

あと上記のスプリクトだと文字列変数の自動拡張がされず
最初にsdimで確保した文字数以上は反映されないので
インストーラ風なら50000文字くらいとっておいたほうがいいです

DDA

2012/11/29(Thu) 01:25:34|NO.50944

ありがとうございます！！
解決しました！