Jeans & Development

（←戻る）

　Windowsフォームを用いた次のようなHello WorldプログラムがSFCで作成できるようになった。

option explicit
Dim SFC
Set SFC = CreateObject("dwtools.NET.SFC")
Execute SFC.Initialize
Execute SFC.Include("<WinForm>")

Dim Form1
Set Form1=new WinForm
call Form1.AddControl(0,"STATIC","List1", _
                 WS_CHILD+WS_VISIBLE+SS_CENTER, _
                 100,50,300,30, 0)
call Form1.AddControl(0,"BUTTON","Command1", _
                 WS_CHILD+WS_VISIBLE+BS_PUSHBUTTON, _
                 100,100,300,30, "Command1_click")
Form1.Init
Form1.Show
wscript.quit(Form1.MsgLoop)

Sub Command1_click(hwnd,message,wparam,lparam)
  msgbox "Hello World!"
End Sub

今回の目玉としては、"Command1_click"という文字列を与えるだけで簡単にボタンのクリックイベントを登録できるところ。

実行画面


（追記）
このシリーズは、この記事をもって終了します。ここまで述べた一連のこととほとんど同じことは、SFC mini を用いれば行うことが出来ます。

（←戻る）

　SFCの完成形がようやく見えてきた。番外編で述べた、複数のファイルに分かれていたツールの本体を一つのDLLにまとめることも終えたし、EnumWindows等のコールバック関数を扱うAPIも使用可能になった。また、ボタンやリストコントロールなども表示できることを確認した。現在の所、このような簡単なコード

option explicit
Dim SFC
Set SFC = CreateObject("dwtools.NET.SFC")
Execute SFC.Initialize
Execute SFC.Include("<WinForm>")

Dim Form1
Set Form1=new WinForm
call Form1.AddControl(0,"STATIC","リストコントロール", _
                 WS_CHILD+WS_VISIBLE+SS_CENTER, _
                 100,50,300,30, 1)
call Form1.AddControl(0,"BUTTON","ボタンコントロール", _
                 WS_CHILD+WS_VISIBLE+BS_PUSHBUTTON, _
                 100,100,300,30, 2)
Form1.Init
Form1.Show
wscript.quit(Form1.MsgLoop)

で、次のようなウインドウが表示できる。



また、SFCの説明ページも完成した。

（続く）

Windows用のフリーソフトウエアのプログラミングツールを並べてみた。

<フリーなプログラミングツール のつづき>

　現在SFCをバージョンアップしている。VB.NETを使用した物に移行しており、順次必要ファイルをdwtools.NET.dllに統合中である。現在のところ(ver 0.3.0.2)、依存ファイルがdwtools.NET.dll, dwtools.dll, sfclodar.wsc, SFC.vbsの４つという、あまりかっこよくない状態になっているので、全ての機能をdwtools.NET.dll一つだけにまとめてしまう予定である。このうち、dwtools.dllはウィンドウプロシージャをこの方法でdwtools.NET.dllに取り込むという形で何とかなりそうで、あとは、sfcloader.wscによるSFC.vbsの読み込み部分の統合が残されているだけとなる。

<WSHでWin32APIを呼び出す-番外編 のつづき>

（←戻る）

　前回の記事では、取得した関数ポインタの値が、ガベージコレクションにより変化する問題があった。これを、GCHandleを用いて、pinnedオブジェクトとして回避する方法を考えてみた。

<VB.NETで関数ポインタの値を取得する２ のつづき>

　VB6で用いられていたAddressOf演算子による関数ポインタの取得等は、.NETではデリゲートという、より高機能なものに取って代わられたらしい。現在制作中のSFC for vbscriptは.NETを利用したものに移行しつつあるが、ここでは相変わらず関数ポインタが必要である。VB.NETでの関数ポインタの取得について色々と調べてみた。

<VB.NETで関数ポインタの値を取得する のつづき>

（←戻る）

　いままでWin32APIの呼び出しに、DynaWrapを用いていた。DynaWrapの再配布の条件などを知るために色々な方に質問してみたが、このツールのライセンスがどうなっているかよく分からない。制作者の方とも連絡が付かないそうである。DynaWrapを改変した物をWeb上に見かけるが、以上の理由からそういった改変や再配布が合法的なのかどうかよく分からない状況である。
　そこで、DynaWrapから脱却することにした。Win32APIを呼び出す方法としては他に、VBなどでActiveXを作り、それを経由して行う方法が一般的なので、それをここでも用いることにした。
　vbscript を書く度にActiveXをコンパイルし直すのではSFCをツールとして制作している意味がないので、殆ど全てのWin32APIを含むActiveXをVB.NETを用いて作成することにした。出来たDLLのサイズは約500kbで、実用の範囲内に収まった。SFC自体の使用方法は以前と殆ど変わらず、上手くアップグレードできたと思う。この時点での最新バージョンは、ver 0.3.0.2（.NET frameworkが必要）。ちなみに、DynaWrapを用いたものの最終バージョンは、ver 0.2.0 であり、こちらはDynaWrapが要る代りに.NETは必要ない。

（SFC ver 0.3.0.2 はこちらから）

（SFC ver 0.2.0 はこちらから）

2005-12-08追記
　ver 0.3.0.2 は初期バージョンで、文字列の操作に不具合在り。 ver 0.3.1で修正されている。あと、ver 0.3.1は、ヘルプファイルも梱包。
（SFC ver 0.3.1 はこちらから）

（続く）

PHPに“最悪”のセキュリティ・ホールとの情報に従って、以下の通り、PHPを4.4.1にアップグレードした。

<PHPのアップグレード のつづき>

こちらは別の、さらに簡単なバージョン。

<スキンを変更するプラグインのひな形２ のつづき>

　event_PreParseSkinでスキンを変更する様なプラグインを考えてみた。NP_Cacheを参考にすると、コアのコードをプラグインに取り込むことで可能のようである。ただし、行儀の悪いプラグインが出来てしまうことになるのだが…。つまり、Nucleusのバージョンアップがあった場合に、プラグインまでバージョンアップをしないと新しい機能に対応できない、もしくはエラーが出る等の不具合が出ることは十分考えられる。そんな訳なので、今のところこういったプラグインを製作する予定はないが、今後の製作の可能性のためにメモを取っておくことにした。

<スキンを変更するプラグインのひな形 のつづき>