mywindow.java

一个可用delphi来开发java的JNI开发包delphi接口

import java.awt.*;
import javax.swing.*;

public class MyWindow extends Canvas {
        static {
                //加载包含 paint 代码的库。
                System.loadLibrary("MyWindow");
        }

        //绘制操作的本地入口点
        public native void paint(Graphics g);

        public static void main( String[] argv ){
                Frame f = new Frame();
                f.setSize(300,400);

                JWindow w = new JWindow(f);
                w.setBackground(new Color(0,0,0,255));
                w.getContentPane().setBackground(new Color(0,0,0,255));
                w.getContentPane().add(new MyWindow());
                w.setBounds(300,300,300,300);
                w.setVisible(true);
        }
}