ＳＲＣ質問掲示板Mk2 [One Topic All View / 上手くいきました！ / Page: 0]

ＳＲＣ質問掲示板Mk2
(現在過去ログ16 を表示中)

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

■2855 / inTopicNo.1)

　改行処理

□投稿者/ 深那　優 -(2002/04/09(Tue) 16:57:27)
http://51038.com/users/tu/src/src.htm

質問です。

現在インクルードを作っていて、画面上に表示する文章内に、";"があった場合、それ以降の文章が改行されて表示されるようにしたいのですが、なかなか上手くいきません。

このような感じに;表示されるようにしたいのです
↓
このような感じに
表示されるようにしたいのです

という風に、";"が文章内に１個だけある場合は改行されるようになったのですが、

このような感じに;表示されるように;したいのです
↓
このような感じに
表示されるように
したいのです

という風に、";"が文章内に２個以上ある場合にも、きちんと改行されるようにする方法がわかりません。

方法がわかる方、ご助言よろしくお願いします。

引用返信/返信削除キー/

■2856 / inTopicNo.2)

　Re[1]: 改行処理

▲▼■

□投稿者/ テクス -(2002/04/09(Tue) 20:42:08)

おこたえしま～す。

え～と、Cybasterさんの公開されている
ウィンドウ会話インクルードが参考になるかと。
インクルード中に:を使った表示の一時停止があり、
それのために文字列中の：を判別している
あたりが参考になるのではないかと思います。

http://homepage2.nifty.com/cybaster/Scenario/Include.htm

何かのお役に立てば幸い。
では,いずれまた因果のかなたで～

引用返信/返信削除キー/

■2861 / inTopicNo.3)

　ダウンロードできない(泣)

▲▼■

□投稿者/ 深那　優 -(2002/04/09(Tue) 23:54:54)
http://51038.com/users/tu/src/src.htm

テクスさん、早速のレスありがとうございます。

ご助言通り、CybasterさんのＨＰへ行って、インクルードをダウンロードしようとしたのですが、何故かダウンロードできませんでした。
で、掲示板にそのことを書き込もうとしたのですが、掲示板も表示されませんでした。
これって私に何か問題があるのでしょうか？

引用返信/返信削除キー/

■2863 / inTopicNo.4)

　サーバーのトラブル

▲▼■

□投稿者/ HY -(2002/04/10(Wed) 00:35:32)

> ご助言通り、CybasterさんのＨＰへ行って、インクルードをダウンロードしようとしたのですが、何故かダウンロードできませんでした。
> で、掲示板にそのことを書き込もうとしたのですが、掲示板も表示されませんでした。

niftyサーバーでトラブルが起こっているようです。
http://homepage.nifty.com/info/#ahp0409

引用返信/返信削除キー/

■2870 / inTopicNo.5)

　Re[4]: サーバーのトラブル

▲▼■

□投稿者/ 深那　優 -(2002/04/11(Thu) 01:00:09)
http://51038.com/users/tu/src/src.htm

そうだったんですか。
それではしばらくしてからまたダウンロード挑戦します。

とりあえずそれまでは自力でがんばってみます。

テクスさん、ＨＹさん、レスありがとうございました！

解決済み!

引用返信/返信削除キー/

■2871 / inTopicNo.6)

　Re[5]: サーバーのトラブル

▲▼■

□投稿者/ テクス -(2002/04/11(Thu) 02:27:31)

レスが遅れて申し訳ないです（＾＾；

え～と、私作のパチモンを下記の場所においてあります。
問題の箇所は、まるまるパクらせてもらっているので、
参考程度にはなるかと思います。

http://gatezelk.hoops.ne.jp/Window.LZH

何かのお役に立てば幸い。
では、いずれまた因果の彼方で♪

引用返信/返信削除キー/

■2878 / inTopicNo.7)

　やっぱり上手くいかない～(泣)

▲▼■

□投稿者/ 深那　優 -(2002/04/12(Fri) 03:09:37)
http://51038.com/users/tu/src/src.htm

テクスさんのインクル、さっそくダウンロードさせてもらいました。
で、参考にさせてもらいながら作ってみたのですが、やっぱり上手くいきません。

一応、こんな感じに作ってみたんですけど…
(WAには、事前に値を入れてあります)

改行処理:

Set H_P 1

If InStr("$(WA)",";") > 0 Then
PaintString 163 20 "$(Left("$(WA)",((InStr("$(WA)",";")) - 1)))"
Refresh
WA = Mid("$(WA)",("$(InStr("$(WA)",";"))" + 1))
Do
If InStr("$(WA)",";") > 0 Then
PaintString 163 ((20 + (5 * H_P)) + (TextHeight("$(WA)") * H_P)) "$(Left("$(WA)",((InStr("$(WA)",";")) - 1)))"
Refresh
WA = Mid("$(WA)",("$(InStr("$(WA)",";"))" + 1))
Incr H_P 1
Else
PaintString 163 ((20 + (5 * H_P)) + (TextHeight("$(WA)") * H_P)) "$(WA)"
Refresh
Break
EndIf
Loop While (1)
Else
PaintString 163 20 "$(WA)"
Refresh
EndIf
Return

ちなみに、変数WAには、

『いらっしゃいませ～♪;って感じです～♪;上手くいった;かな～？』

という値を入れてあります。
で、動作させると、

『いらっしゃいませ～♪』

の部分だけが、ひたすら表示されてしまいます。

いったいどうすればいいのでしょうか(泣)

引用返信/返信削除キー/

■2879 / inTopicNo.8)

　Re[7]: やっぱり上手くいかない～(泣)

▲▼■

□投稿者/ 樹招 -(2002/04/12(Fri) 06:53:14)

どうも、はじめまして。（この掲示板に書き込むの初めてなので（汗））

作成されたインクルードですが、こちらで試してみた結果。
安定板（Ver.1.6.54）では問題なく動作しましたが、
開発版（Ver.1.7.1）では動作しませんでした。

ちょっと改変させてもらって、試したところ、
開発版で動かない原因はおそらくこれじゃないかなと。

一つ例にとって、
> WA = Mid("$(WA)",("$(InStr("$(WA)",";"))" + 1))
開発版で動かない原因は、
不必要なダブルクォート「"」が多いからだと思います。

上記の式は、
WA = Mid(WA,(InStr(WA,";") + 1))
でも十分動作します。

上のように各所の不要なダブルクォートを削除すれば、
開発版でも動作するのを確認しました。

頑張って下さい。
それでは・・・

引用返信/返信削除キー/

■2881 / inTopicNo.9)

　上手くいきました！

▲▼■

□投稿者/ 深那　優 -(2002/04/12(Fri) 17:41:41)
http://51038.com/users/tu/src/src.htm

樹招さんの助言通りにして試してみたら、無事思う通りに動作しました！
テクスさん、ＨＹさん、樹招さん、ご助言本当にありがとうございました！！

喜びもつかの間、また新しい疑問が発生してしまったので、思考錯誤した後、どうしても分からなかった場合、また質問させていただきます。
その時はまた助言してくださると助かります。
それでは本当にありがとうございました！

解決済み!

引用返信/返信削除キー/

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

このトピックに書きこむ

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

HOME HELP 新規作成新着記事トピック表示検索新着情報過去ログ

- Child Tree -
- Antispam Version -