003337
雑談掲示板
[トップに戻る] [使い方] [ワード検索] [過去ログ] [管理用]
おなまえ
Eメール
題  名  
コメント
URL
ガード用キー(必須) 1234と半角で入力
イメージ (あなたのイメージを選択して下さい) [画像イメージ参照]
パスワード (記事のメンテ時に使用。英数字で8文字以内)
文字色

お久しぶりです。 Ver2 投稿者:シノア 投稿日:2007/04/05(Thu) 13:12 No.314   HomePage
mouse.gifどうも、お久しぶりVer2です。

ふむふむ。。。。削除する個数を数えてから
その分だけ一気に削除するのですね、確かに早くなるような気がします。

あと、DirectXのサンプルコードはもしよろしければウチのつくり途中のゲームソースコ
ードを送ってみましょうか?
出来たら、ウチのもう一つの緊急用サイト
(http://www.geocities.jp/tukiyo_osa/gs/index.html)にある
メールアドレスに確認用メールを送っていただけないでしょうか?
メールアドレス帳が暴発したので・・・・・・orz

あとDirectXのソース一部をここに記述するとこんなもんです。

'出来るだけハードウェアモードで初期化
Try
'最高の状態で初期化
d3dDevice = New Direct3D.Device( _
0, _
Direct3D.DeviceType.Hardware, _
gameForm, _
Direct3D.CreateFlags.HardwareVertexProcessing, _
parameter)
Catch
Try '頂点処理だけソフトウェアの初期化
d3dDevice = New Direct3D.Device( _
0, _
Direct3D.DeviceType.Hardware, _
gameForm, _

Direct3D.CreateFlags.SoftwareVertexProcessing, _
parameter)
Catch
Try 'リファレンスモードで初期化(これぐ
らいになると処理がきつい)
d3dDevice = New Direct3D.Device( _
0, _
Direct3D.DeviceType.Reference, _
gameForm, _

Direct3D.CreateFlags.SoftwareVertexProcessing, _
parameter)
Catch 'それでもだめなら初期化失敗
d3dDevice = Nothing
End Try
End Try
End Try

ちなみにDirectX9.0 for Managedということで.NETで使うDirectXです。
.NETバージョンは2.0です。
あと、半年ぐらいしたらウチのサイトにDirectX for Managedの講座のようなものを
設置してみようと思うので、よろしかったらそちらもご参照ください(^^)

ではでは


お久しぶりです。 投稿者:シノア 投稿日:2007/03/31(Sat) 22:19 No.309   HomePage
bear.gifお久しぶりです。
これと言った用はないのにすいません・・・・
ちょっとプログラミングネタを理解してくれそうな雑談をしたかったので・・・・

最近元気でお過ごしでしょうか?
僕は最近Subステートメントを使って大量に関数を作って遊んでます・・・・・
ちゃんと理由があるんですけどね・・・・むやみにたくさん作りませんが・・・・

あとDirectXプログラミングも楽しくやってます。

ではでは、本当に雑談どころか独り言みたいですいません


Re: お久しぶりです。 シノア - 2007/03/31(Sat) 23:51 No.310   HomePage

bear.gifあ、あと見てほしいものがあるのですが

あるファイル(ソースファイルなど)を読み込み
一行一行みて先頭にタブや空行などがあったとき
それを削除していくというプログラムを組んでみたのですが
聖さん的にどうでしょうか?

Private Function ReText(ByVal filePath As String) As String

'ファイルを開く
Dim file As New IO.StreamReader(filePath,
System.Text.Encoding.Default)
'一行バッファ
Dim lineBuffer As New System.Text.StringBuilder
'テキストバッファ
Dim buffer As New System.Text.StringBuilder

'ファイルの最後まで一行ずつ編集
While Not file.EndOfStream

'一行読み取って空行なら無視して何かあるなら編集
lineBuffer.Append(file.ReadLine)
If lineBuffer.ToString <> "" Then

'文字列の先頭にタブや空白文字があったら削除
してバッファに追加
Do
'もし文字列が空になったら配列範囲
外の例外が出てくるからそのときはループから抜ける
Try
If (lineBuffer.Chars(0)
= vbTab) Or (lineBuffer.Chars(0) = " ") Or (lineBuffer.Chars(0) = " ") Then
lineBuffer =
lineBuffer.Remove(0, 1)
Else
Exit Do
End If
Catch
Exit Do
End Try
Loop
buffer.AppendLine(lineBuffer.ToString)

Else

'空行でも一応バッファにそのまま追加
buffer.AppendLine(lineBuffer.ToString)

End If

'一行バッファのインスタンスを作り直す
lineBuffer = New System.Text.StringBuilder

End While

'ファイルを閉じる
file.Close()

'編集した文字列を返す
Return buffer.ToString

End Function

なにかコメントなどくれたらうれしいです。

ではでは


Re: お久しぶりです。 聖 羅樹 - 2007/04/05(Thu) 10:00 No.313  

laputa.gifお久しぶりです。
おかげさまで“それなりに”元気に過ごしております。(^ ^;

プログラミング、続けていらっしゃるんですね。
今のうちにあれこれ楽しみながら覚えていってください。

ソースですが、実際に動かしてみました。
まず気になった点ですが、1点だけ。
ループの途中で文字がなくなった際に、例外処理にてそれを判断している箇所がありま
すが、
想定できる例外の場合は、普通にIF文で判定かませたほうがいいかな、と思います。
私の個人的な意見ですけどね。

あとは、前空白を取り除く方法ですが、
VBならば LTrim() 関数が使えますので、それを使う手もあります。
C# や .NET Framework 信奉者からは邪道だ!とか言われそうですけどね(^ ^;;

あとは、もし速度を求めるならば、
ループ中、毎回1文字ずつ削除するのではなく、
判定する文字を1文字ずつ後ろのずらしつつ、
先頭から何文字分削除するのかだけをループ内で判定(保持)し、
実際の削除はDoループを抜けた直後で1回で行えば、
もしかしたら早くなるのかも?
そうすれば、StringBuilderクラスを使わなくても
String変数でも十分いけますし。
1行読み込むたびに StringBuilder クラスを New していくより、
読み込む直前で String = String.Empty したほうが早いのかな、とも
思ったので。

最後に、これは特にどうでもいいのですが、
ファイルの最後かどうかの判定を StreamReader.EndOfStream() メソッドを使っている
のが
私にとっては新鮮だったり。
ずっと Peek() メソッドばかり使っていたので。

それくらいでしょうか。

DirectXの勉強頑張って下さい。
何か簡単なサンプルコードとかあったら、送ってもらえると嬉しかったり。
最近仕事入れすぎてロクにプログラミングできてないので。


どうもー早いですが 投稿者:シノア 投稿日:2006/12/20(Wed) 18:21 No.307  
bear.gifどうもー、シノアです。
もう少しで2006年も終わってしまいますねーー(^^
あと10日程度残ってますが(^^;
来年もよろしくお願いしますm(_ _)m

ではでは


Re: どうもー早いですが 聖 羅樹 - 2006/12/21(Thu) 07:55 No.308  

laputa.gifこちらこそよろしくお願い致します。


掲示板復活おめでとうござ... 投稿者:シノア 投稿日:2006/09/26(Tue) 02:21 No.305   HomePage
bear.gif掲示板にこんな題名はありえませんが、とりあえず掲示板の復活おめでとうございま
す。
また何かありましたら書き込みします。

ではでは


Re: 掲示板復活おめでとう... 聖 羅樹 - 2006/09/26(Tue) 22:43 No.306  

laputa.gifいつもいつも、本当にありがとうざいます。
またのお越しをお待ちしております。


明けましておめでとう御座... 投稿者:シノア 投稿日:2006/01/03(Tue) 18:24 No.247   HomePage
bear.gif挨拶が遅れましたが、新年明けましておめでとう御座います。
今回は挨拶という事で参りました。
これからもよろしくお願いします。m(_ _)m

ではでは


Re: 明けましておめでとう... 聖 羅樹 - 2006/01/03(Tue) 18:56 No.248  

laputa.gif新年明けましておめでとうございます。
本年も宜しくお願い致します。

[直接移動] [1] [2] [3] [4] [5]
- 以下のフォームから自分の投稿記事を修正・削除することができます -
処理 記事No パスワード

- KENT & MakiMaki -