前回の続き。 http://d.hatena.ne.jp/arikui/20090428/1240866008 前は、 (なんちゃら).Invoke("呼ぶメソッドの名前", [引数]) という風でしたがやっぱり使いづらい。Ruby のオブジェクトをそのまま JavaScript にしたような感じで使いたい。ということで、…

AgDLRのRepl面白いですね。 CodePlex Archive ブラウザ上で Ruby を試せる「IRBWEB」を作ってみた - てっく煮ブログ 跡地 Replは名前のとおりブラウザ上でレプるためのパーツって感じでしょうか。Replの実装は大体こんな感じでやってるんだと思います。 http…

メモ。 クラスにScriptableTypeAttributeを設定する ScriptableTypeAttribute Class (System.Windows.Browser) | Microsoft Docs <Browser.ScriptableType()> _ Public Class Library1 Dim _aaa As Integer = 1 Public Property aaa() As Integer Get Return Me._aaa End Get Set(ByVal</browser.scriptabletype()>…

人気のプログラミング言語、VisualBasicっぽく書けるJavaScriptライブラリを開発する日記です。 最初はFor Nextステートメントを実装したいと思います。 function For(start){ For.isExit = false; return { To: function(end){ var step = 1; var loop = fu…

久々にSilverlightでもやってみたくてVisual Studio 2008 用 Silverlight Toolsをインストールしようとしたら、Visual Web Developerが必要、みたいなことを言われた。 使ったもの Visual Web Developer 2008 EE Visual Studio 2008 用 Silverlight Tools Be…

機能のつづき: ウィンドウをキャプチャしてアニメーションGIFを作る (.NET) - f8g AVIファイルの生成 WindowsではDirectShowを使ってAVIファイルを作ることができます。だた、DirectShowを.NETで使おうとすると結構面倒なので、これもまたその辺のライブラリ…

.NET Framework v3.5で動作確認。(v2.0.50727でも動くと思う） 使ったもの Windows Visual Basic 2008 express edition 時間 ウィンドウのキャプチャ ' Imports System.Runtime.InteropServices ''' <summary> ''' GetWindowRectで使う構造体 ''' </summary> <StructLayout(LayoutKind.Sequential)> _ Structure RECT </structlayout(layoutkind.sequential)>…

IronRubyでは、 http://d.hatena.ne.jp/arikui/20071115/1195136984 のようにして使えるやつ。なんとVB.NETではラムダ式が使えるんだって。すごいや。 ' ClassLibrary1というところにある Imports System.Drawing Public Class ImageProccessing Public imag…

http://www.vector.co.jp/soft/win95/prog/se373990.html これを見るととても簡単そうなのでやってみたら、本当に簡単にできた。試しにMSCommっぽいの。 Imports Microsoft.VisualBasic Imports System.Runtime.InteropServices Imports System.IO.Ports Nam…

単純に、変なところにExit Subがあっただけだったorz

クラスモジュールでPublic Typeできない 標準モジュールで定義 クラスモジュールから使おうとするもできない 多分、クラスモジュールと標準モジュールの親が同じだからかね。

ByValとかByRefとか忘れるなー。 Private Type POINTAPI x As Long y As Long End Type Private Declare Function GetCursorPos Lib "user32" ( _ ByRef lpPoint As POINTAPI _ ) As Long Private Declare Function SetCursorPos Lib "user32" ( _ ByVal x A…