Hello, COM(Boo) World!

Posted on 2月 8th, 2013 by cx20

COM(Boo)

COM(Component Object Model)はマイクロソフトの提唱するプログラム部品の仕様である。
COM を用いて開発された部品であれば言語を問わず利用することができる。
以下は Boo による COM クライアントの例となっている。

ソースコード(実行時バインディング)

import System
import System.Reflection
import System.Runtime.InteropServices
 
[STAThread]
def Main(argv as (string)):
    objType = Type.GetTypeFromProgID("Shell.Application") 
    shell = Activator.CreateInstance(objType)
    param as (object) = ( 0, "Hello, COM(Boo) World!", 0, 36 )
    folder = shell.GetType().InvokeMember( "BrowseForFolder", BindingFlags.InvokeMethod, null, shell, param )
    if (folder != null):
        Marshal.ReleaseComObject(folder)
    Marshal.ReleaseComObject(shell)

コンパイル方法(実行時バインディング)

C:¥> booc Hello.boo

実行結果

+----------------------------------------+
|Browse For Folder                    [X]|
+----------------------------------------+
| Hello, COM(Boo) Wolrd!                 |
|                                        |
| +------------------------------------+ |
| |[Windows]                           | |
| | +[addins]                          | |
| | +[AppCompat]                       | |
| | +[AppPatch]                        | |
| | +[assembly]                        | |
| |     :                              | |
| |     :                              | |
| |     :                              | |
| +------------------------------------+ |
| [Make New Folder]    [  OK  ] [Cancel] |
+----------------------------------------+

Tags:

Categories: .NET, Boo, COM

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

WP-SpamFree by Pole Position Marketing