用Java JNI 本地接口技术实现 圆形窗口

 

 

 

 

把Java窗口的句柄传递给以个DLL通过windows API  修改窗口区域 就可以咯

在写得过程需要在程序中调用Delphi  的一个库函数

 

高兴的是偶然的机会得到了一个可以用java 调用delphi 的类库

嘿嘿

 

 

1. public class Test{
2. public static void main(String [] args){
3. new FWindow().ShowMe();
4. }
5. }
6. import javax.swing.*;
7. import java.awt.*;
8. public class FWindow extends JWindow{
9. public native void ShowMe();
10. public FWindow(){
11. this.setSize(500,500);
12. this.setVisible(true);
13. }
14. static
15. {
16. System.loadLibrary("model");
17. }
18. }

1. library Project1;
5. uses
6.  SysUtils,
7.  Classes,
8.  windows,
9.  JNI,
10.  jawt_md,
11.  jawt_info,
12.  jawt_delphi,
13.  forms;
15. {$R *.res}
17. procedure Java_FWindow_ShowMe(PEnv: PJNIEnv; Obj: JObject); stdcall;
18. var
19.    JAWT_Info:TJAWT_Info;
20.    hwnd:integer;
21.    ren1:Hrgn;
22. begin
23.    JAWT_Info:=TJAWT_Info.create(PEnv,Obj);
24.    hwnd:=JAWT_Info.getHWND;
25.    ren1:=CreateEllipticRgn(27,27,180,180);
26.    setwindowrgn(hwnd,ren1,true);
27. end;
29. exports
30.  Java_FWindow_ShowMe;
31. end.