20レス以内で済むF-BASIC質問の件 - 1077303357

1：S.A：2004/02/21(土) 03:55: 今回は過去の掲示板過去ログを探していますの件で
大変お世話になりました。S.Aと申します。
20レス以内で済むF-BASICの質問はこちらへとありましたが
今回の掲示はこの場所で良かったのでしょうか。
それとも20レス以内で済むF-BASICの質問の方になるのでしょうか。
また、20レス以内とありましたが、20レスとは20行の意味で理解して良いでしょうか。
その辺はあまり詳しくありませんので、よろしくお願い致します。
2：Ｆ橋：2004/02/23(月) 20:48: 私の説明不足で申し訳ございません。
スレッド型の掲示板（ここの掲示板）は少々ややこしいので…近い内に使い方などをまとめて掲載する様に考えてみます

>今回の掲示はこの場所で良かったのでしょうか。
すいません。違いますです。次回から↓こちらでお願いします

■■■20レス以内で済むF-BASICの質問はこちらへ■■■
http://jbbs.shitaraba.com/bbs/read.cgi/computer/7997/1071834531/

>それとも20レス以内で済むF-BASICの質問の方になるのでしょうか。
>また、20レス以内とありましたが、20レスとは20行の意味で理解して良いでしょうか。
ご存じかと思いますが…掲示板に対しての投稿をレスポンス…（略してレス）と言います
つまり20回程度以内のやり取り（投稿Noが20くらいまで。と言えばいいでしょうか？）の場合に
先ほどの「20レス以内で済むF-BASICの質問はこちらへ」のスレッドへご投稿頂けると助かります

考え方的に。ですが…
この掲示板の一番上の「スレッドを作る」は「掲示板を作る」と思った方が近いかも知れません
従って２～３人程度のやり取りのみで一つのスレッドが終わり次々にスレッドを立てられると
掲示板から情報が探しにくくなるかと思います

例えば自由に掲示板が作れるHPがあったとして…（見る人がそのHPに対して自由に掲示板を作れるとして）
内容がすぐに終わってしまいそうな掲示板をたくさん作られると見づらくなってしまうかと思います

その…大変申し上げにくいのですが…スレッド型の掲示板でレスが２～３くらいしか付かないスレッドを
立てると場所によっては「掲示板荒らし」と見なされる事もありますのでご注意頂けますようよろしくお願いします
3：S.A：2004/02/23(月) 22:54: 投稿して下さいましてありがとうございました。常識な事と思いますが
Ｆ橋さんの説明によりましてレスについて初めて知る事ができました。
それで「20レス以内で済むF-BASICの質問はこちらへ」の意味がわかりました。
そのお陰で一つ勉強になりました。今後もよろしくお願いいたします。
4：マツ：2004/03/01(月) 12:32: はじめまして、いつも見させて頂いております。

メインフォーム上にテキストコントロールが10個程あり、
これのフォントサイズを一気に指定したいのですが、
良い方法はないでしょうか？

今は、TEXT1.SETFONTSIZE 12 ～ TEXT10.SETFONTSIZE 12まで
10行使って1つずつ指定しています。
5：マツ：2004/03/01(月) 12:50: 何度も質問してすみません。

あと、プログラム上でメインフォームにコントロールを配置する方法も教えて頂けないでしょうか？
コントロールの数が増えると Var **** as object だけで数十行になってしますので、
for文などを使ってある程度まとめて作成出来ると良いのですが…。

よろしくお願いします。
6：ＴＯＫＯ：2004/03/01(月) 14:00: このホームページＴＯＰ、サンプルソース
★エディットボックスでエンター移動★　(提供gobou氏)
が参考になると思います。
7：マツ：2004/03/01(月) 21:03: TOKOさん、返信ありがとうございます。

無事に解決致しました、感謝致します！
8：マツ：2004/03/01(月) 23:35: for I=1 to 12
COMBO(I).ATTACH GETDLGITEM("COMBO" + trim$(str$(I)))
next I

今までより、かなり楽に出来るようになりました。
ＴＯＫＯさん、改めてありがとうございます。
9：マツ：2004/04/16(金) 17:25: F-BASICユーザの皆様、こんにちは。

また１つ教えてください…。

HTTPGET関数で、指定したアドレスのhtmlファイルを取得したのですが、
いつも1.99KB程度で切れてしまいます。
(そのページのhtmlファイル自体は48KBあります)

どういった原因が考えられますでしょうか？
10：ねずみ男：2004/04/16(金) 20:08: 関係無いかも知れませんが…

F-BASICとは全然関係無い話なのですが「メールで」ある程度の大きなメールだとエラーが出る
（少ない文字数では問題は出ない）という現象があるはずなのですが…
ＯＳやメールソフトなどは関係無くルータやプロパイダなどの設定によって大きなサイズの場合エラーが出る。
という話があるはずなのですがそれのサイズが2000byte前後だった様な気がするです

話を戻して…これってF-BASICのHTTPGETにもあてはまるのでは無いかなーと思う次第なのですが…

ともかく。メールでの大きなファイル（2000Byte以上）のやり取りで問題は無い環境なのでしょうか？
メールでのやり取りでも問題があるのならばF-BASICの問題では無く環境の問題の気がしますです

-----

うろ覚えなんですが…（もちろん数字もうろ覚え）
2000Byteの入れ物でメールのやり取りをし…前後に「勝手に」誰かが（プロパイダやルータが）
ヘッダやフッダを付けるのでメールの本文は1900Byteくらいになっているらしいんだけど…
（ヘッダやフッダを付けても2000byte以内に収まる様に本文は（内容は）1900byte程度とか少な目）
ルータがいくつもある環境ではヘッダやフッダがたくさん付いて2000Byteの入れ物に入らず
2000Byte以上の場合のみ何かおかしくなるとかなんとか…だったと思うです
IEとかネスケは確かこの辺りがおかしくてもホームページを読み直すとかなんとかだった気がする…
（その代わり読込のリトライをするので遅くなる。とかだった気が…）

…偉い人。あとお願いします（おい
11：マツ：2004/04/18(日) 01:04: ねずみ男さん、返信ありがとうございます。

＞メールでの大きなファイル（2000Byte以上）のやり取りで問題は無い環境なのでしょうか？

はい、これは問題ありません…。
試しに、PureBasicという開発ソフトで同じ事を試して見た所、
全く問題なく動作致しました。

出来れば使い慣れたF-BASICで実現させたかったのですが…。
12：ニャン子：2004/04/22(木) 01:14: お久しぶりです。ニャン子です。

随分前ですが、F-Basicがコンパイルした際に残すゴミを削除する
プログラムを作りましたが、その正式版（？）を作りました。

ダウンロードは下記から行えます。
http://hp.vector.co.jp/authors/VA025808/Gomi.lzh

今回はＧＵＩをリソースでは無く、GSXGUIで作成しました。
（なんとなくＸＰ風に作り変える作業が面倒だったので・・・）
13：ねずみ男：2004/04/22(木) 23:03: >>11
>全く問題なく動作致しました。
環境の問題では無いようですね。役に立たないレスでお騒がせしました

ふと思ったのですがhttpgetじゃないとダメなんでしたっけ？（ftpgetではダメなんでしょうか？）
うろ覚えで申し訳ないのですがファイルのやり取りはhttpgetよりftpgetのがいいと聞いた様な気が…

…違ったらすいませんです

>>12
こっそり頂戴しますのでよろしくです。ありがとうございました
14：ニャン子：2004/04/23(金) 09:51: ニャン子です。

HttpGetとFtpGetですね。たしかChigayaさんのページでＡＰＩを使った
インターネットへのアクセスプログラムのサンプルが公開されていました。

インターネットへのアクセスはWinSockでアクセスするはずですが、HTTPやFTP,
MAILそれぞれソケットに対するポート番号が全く違いますからFTPとHTTPのどちら
にアクセスするかはアクセスするサーバとその利用権限、ダウンロードする目的に
よっても違うと思います。

chigayaさんのＨＰアドレス
http://www.geocities.co.jp/SiliconValley-SantaClara/1866/

そう言えば、随分前ですがActiveBasicのサイトでActiveBasicのプログラムが
ダウンロード出来ないというユーザさんがいて、その人にLHAファイルをダウン
ロードするプログラムをF-Basicで（HTTPGET命令を使って）作った記憶があり
ます。（HTTPGETで700KB弱のダウンロードはうまくいきました）多分でしか言え
ませんが、アスキー／バイナリ形式での問題もありそうな気がします。
・・・かなり前の事なのであまり覚えていません。申し訳ないです。
15：マツ：2004/04/23(金) 12:49: ねずみ男さん、ニャン子さん
返信ありがとうございます。

あれから色々試してみたんですが、
何度やっても、途中で切れた状態でローカルに保存されます。

ニャン子さんに教えて頂いた、chigayaさんのホームページで、勉強させて頂きます。

ありがとうございました★
16：りゅう：2004/09/27(月) 19:37: お久しぶりです。いつもありがとうございます
古い方にも質問しましたが・・・

ＵＳＢのモデムを使用したいのですが
２３２Ｃの制御で上手くいかないようです。
私は持っていませんが、使ってる人が、２３２Ｃ用のソフトでは動作しない
と言ってきたものですから。

プロトコル制御は、何か違うのでしょうか？
ボーレート指定
comfn=freefile
baud 9600,1
open "COM2:(S8N1N8)" as #comfn
出力
print #
入力
line input #
で行っています

よろしくお願い申し上げます。
17：Fbasic使用者：2004/10/21(木) 13:53: お世話になります。
F-BASIC Ver6.3の集い場からプリンタ名とポート名の列挙ソフトを拝見しました。
そのソフトを参考でCOM1～COM5までのポート名とその詳細を表示したいと思いましたが解りませんでした。
自分のパソコンのプリンタのプロパティ→詳細→印刷先のポートを見ましたら下記の様になっていました。
COM1: (通信ポート)
COM2: (LT Win Modem)
COM4: (赤外線シリアル (COM) ポート )
COM5: (赤外線シリアル (COM) ポート )
F-BASICのプログラムで上記のように
COM1～COM5までのポート名とその詳細を表示することは可能でしょうか。
ご存知の方がおりましたらご指導を願えればと思います。
宜しくお願い致します。
18：nisii：2004/10/22(金) 14:09: レジストリを読めばいいのかな？
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/serial/hh/serial/sseovr_6ae5c2bb-a184-483e-9265-9a35daa2d5b6.xml.asp

1.シリアルポートテーブル内を検索
HKEY_LOCAL_MACHINE\SYSTEM\ControlSet\Services\Serial\Enum

2.テーブルからサブキーを取り出し、詳細を参照(以下は固定値ではありません)
HKEY_LOCAL_MACHINE\SYSTEM\ControlSet\Enum\ACPI\PNP0501\1

COM3以降の取り出しは、別の方法かも。
MSDNなどで探してください。
19：Fbasic使用者：2004/10/22(金) 15:02: nisiiさん
ご返答下さいましてありがとうございました。
プリンタ名とポート名の列挙ソフトから
ポート名の列挙がありましたので一部を追加して
出来ればと思っていましたが、お送り下さいました
情報を見て調べでみました。OS、COMにより工夫が必要で
自分では簡単でないことが解りました。
お陰様で納得する事ができました。
お礼を申し上げます。
20：akira：2004/12/08(水) 23:27: エディットコントロールの背景色をプログラムから変更することは
できるのでしょうか？
教えてください。
よろしくお願いします。
21：Ｆ橋：2004/12/09(木) 13:11: >>16の件は私はF-BASICでUSBを扱った事が無く分かりませんです
F-BASICでUSB経験者の方。見えましたら>>16の件お願いしますです
22：iwaki_farm：2004/12/11(土) 21:32: 残念ながらUSBは使えません。
USBプリンタでLPT0:のように直接印刷出来ませんでした。
23：ＴＯＫＯ：2004/12/12(日) 08:43: 掲示板(ツリー)#1163ねずみ男さんのレスも参照・・
簡単なテスト方法は、
'書込
open "test.csv" for create as #1
'4行あるとして・・読み込んでテキストモードフォームに表示できるよう
for i = 1 to 4
z$ = ""
'100項目
for j = 1 to 100
if j < 100 then
'テスト用にランダムな数字を文字列に""で囲む
z$ = z$ + chr$(34) + right$(str$(rnd(1)),2) + chr$(34) + ","
else
'100項目で、改行(1行おわり)
z$ = z$ + chr$(34) + right$(str$(rnd(1)),2) + chr$(34)
end if
next j
print #1,z$
next i
close #1

'読込は1行100項目をを一度に読み込まなくても
open "test.csv" for input as #1
'データのある間
while not eof(1)
'100項目と決まっているので
for i = 1 to 100
input #1,z$
'取得データを配列に入れる、または表示

'ただフォームに表示する場合
if i < 100 then
'表示の都合上","を付加
print z$ + ",";
else
print z$
print
end if
next i
wend
close #1
で、いいのではないかと思います。

蛇足ですが、chr$(34)は、空白のあるファイル名を読み込む場合も使います。