Hello, Win32 API(Oxygene) World!

Posted on 3月 20th, 2013 by cx20

Win32 API(Oxygene)

Win32 API は、Windows の機能にアクセスする為の API(Application Programming Interface)である。
以下は Oxygene にて SWT の非公開 API を使用した Win32 API 呼出しの例となっている。

ソースコード

namespace hello;
 
interface
uses
    org.eclipse.swt.internal.win32.*;
 
type
    Hello = class
public
    class method Main(args: array of String);
end;
 
implementation
 
class method Hello.Main(args: array of String);
var
    lpText: TCHAR;
    lpCaption: TCHAR;
begin
    lpText := new TCHAR(0, "Hello, Win32 API World!", True);
    lpCaption := new TCHAR(0, "Hello, World", True);
    OS.MessageBox(0, lpText, lpCaption, OS.MB_OK );
 
end;
 
end.

コンパイル&実行方法

C:¥> oxygene Hello.pas -ref:rt.jar;org.eclipse.swt.win32.win32.x86_3.6.1.v3655c.jar -mode:Java
C:¥> java -Xbootclasspath/a:org.eclipse.swt.win32.win32.x86_3.6.1.v3655c.jar -jar hello.jar

実行結果

---------------------------
Hello, World!
---------------------------
Hello, Win32 API World!
---------------------------
OK   
---------------------------

Tags:

Categories: Oxygene, Win32 API

コメントを残す

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

WP-SpamFree by Pole Position Marketing