使用delphi建立一个VCL工程。在本程序中不需要form,因此,可以将默认生成的form删除。实际上,我们只需要调用ShellExecute方法就可以通过javaw命令来执行jar文件,代码如下:
shellexecute(GetActiveWindow, 'open','javaw', '-jar my.jar', '', SW_NORMAL)
其中GetActiveWindow方法获得当前窗口的句柄。在本程序中使用了一个config.ini文件来指定要执行的jar文件,实现的完整代码如下:
program launcher
uses
Forms,
windows,shellapi, inifiles, sysUtils
{$R *.res}
var
ini: tinifile
JarFile: String
begin
Application.Initialize
ini := tinifile.Create(extractfilepath(application.ExeName) + 'config.ini')
JarFile := ini.ReadString('config', 'JarFile', '')
shellexecute(GetActiveWindow, 'open','javaw', PWideChar('-jar ' + JarFile), '', SW_NORMAL)
ini.Free
Application.Run
end.
在和exe相同的目录下建立一个config.ini文件,内容如下:
[config]
JarFile = jars\swt.jar
其中swt.jar文件是执行的jar文件,要放在当前目录的jars目录中。现在的目录结果如下:
launcher.exe
config.ini
jars\swt.jar
其中launcher.exe和config.ini也被包含在本文的下载文件中。读者只需要修改config.ini文件中的相应的jar文件名即可。也可以将launcher.exe改成其它的文件名。还有就是要修改launcher.exe文件的图标,可以直接在delphi2009(低版本的delphi也可以,最好7.0以上告迟老)中改,也可以找一些编辑二进制资源的程序,直接打开launcher.exe文件,修改其中的图标。
当然,本程序也可以使用任何可生成原生可执行文件的编程语言开发,如C、C++等。
OK,现在就可以通过双击launcher.exe文件来调用jar包了。要想对launcher进行扩展,就直接修改源代码吧。其实这个实现袜升是非常非常地简单!!!
步骤:1、 引包
import java.awt.*import javax.swing.*
2、 继承JFrame
public class Demo3 extends JFrame {}
3、 定义需要的组件
//3.定义组件
JButton jb1,jb2,jb3,jb4,jb5int size=9
JButton jbs[]=new JButton[size] //先分配初始扮键空间 4、 创建组件
//4.创厅历巧建组件 jb1=new JButton("中部")//创建组件
for(int i=0i<sizei++) {
jbs[i]=new JButton(String.valueOf(i))
}
5、 设置布局管理器
//设置布局管理器,默认是的边界布局管理器 this.setLayout(new FlowLayout(FlowLayout.LEFT))//流式布局 this.add(jb1,BorderLayout.CENTER) //边界布局 this.setLayout(new GridLayout(3,3,10,10)) //网格布局
this.setLayout(null) //取消布局管理器
6、 添加组件
//添加组件 this.add(jb1)
this.add(jb2)
7、 设置窗体属性
//设置窗体属性 this.setTitle("流式布局案例") //设置窗体标题 this.setSize(300, 200) //设置窗体大小 this.setLocation(200, 400) //设置初始位置
this.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE) //关闭窗体时关闭虚拟机
//禁止用户改变窗体大小
this.setResizable(false) //7.显示窗体
this.setVisible(true)
8、烂并 显示窗体
利用数组创建组件:
//定义组件 int size=9
JButton jbs[]=new JButton[size] //数组要先分配初始空间 //创建组件
for(int i=0i<sizei++) { jbs[i]=new JButton(String.valueOf(i))
}
//添加组件 for(int i=0i<sizei++) { this.add(jbs[i])
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)