jnative调用delphi的DLL文件
1.下载JNative的包
JNative-1.3.2下有三个文件：JNativeCpp.dll，libJNativeCpp.so，JNative.jar。
JNativeCpp.dll拷到windows/system32目录下
libJNativeCpp.so为Linux中使用的文件
JNative.jar扩展包拷到%JAVA_HOME%\jre\lib\ext下或者导入到工程中
2.Jnative中使用到的一些类和方法
org
.xvolks
.jnative
.Jnative
: 装载dll文件，定位函数 如:Jnative native=new Jnative("dllName");
JNative
(),setParameter(),setRetVal(),getRetVal()
etc.
org
.xvolks
.jnative
.pointers
.Pointer: 替代本地函数中的的指针，需要先申请一块内存空间，才能创建,一般使用MemoryBlockFactory
利用工厂模式进行创建.
Pointer()，dispose()
org
.xvolks
.jnative
.pointers
.memory
.MemoryBlockFactory : 申请一块内存空间
createMemoryBlock()
org
.xvolks
.jnative
.exceptions.NativeException
: 抛出装载，定位等方面的异常
org
.xvolks
.jnative
.Type
: 列举和管理Jnative
需要的不同的数据类,一般需要传值的时候指定所传值的类型和函数的返回值
3.使用方法
3.1.
加载dll文件
JNative可使用两种方式加载dll文件：
使用System.loadLibrary
加载
使用此方法可加载系统目录中的dll文件。可以先把dll文件复制到system32
目录下，使用文件前缀名作为参数来加载dll文件。
使用System.load
加载
此方法参数为dll文件全路径名。
3.2.
调用函数
1、首先创建JNative对象：
JNative jnative = new
JNative(dll文件名, 函数名);
2、设置返回值类型：
jnative.setRetVal(Type.INT);
3、设置参数
jnative.setParameter(0,
Type.STRING, …); //设置第一个参数为字符串
jnative.setParameter(1,
Type.INT, String.valueof(…)); //设置第二个参数为整数
4、执行
n.invoke();
5、获取返回值
Integer.parseInt(jnative.getRetVal());
4.一个简单的例子：
import org.xvolks.jnative.JNative;
import org.xvolks.jnative.Type;
import org.xvolks.jnative.exceptions.NativeException;
public class JNativeTest {
public static final int messageBox(int parentHandle, String
message,
&nb
相关文档：
Delphi 7事件的多处理机制
Allen Tao
2007-08-19
首先解释一下这个题目。在我使用Delphi 7的过程中发现，一个对象的事件只能被一个过程处理。如果多次给这个对象的事件赋给处理事件的过程，最后真正处理事件的将是最后赋值的那个过程。例如，有类TMyClass中定义了一个事件OnSomeFired，在类TClientClass中� ......
procedure TForm1.Button3Click(Sender: TObject);
begin
//显示创建的数据集: dbgrid->datasource->clientdataset
//如果手工控制dbgrid显示宽度,dbgrid右键创建两个字段aa,bb,分别设置宽度即可
cds1.FieldDefs.Add('aa',ftString,40);
......
招聘人数： 4人
学历要求： 不限
工作年限： 不限
薪资范围： 面议
工作地点： 北京通州九棵树
Delphi程序员四名职位要求
要求:
1. 熟练使用DELPHI(C,C++, C#等)进行开发；
2. 具有良好的程序编写习惯；
3. 扎实的基本功，结构清晰、合理；
4. 良好的执行能力，较好的完成预定任务；
5. 上进心强，能吃� ......
引用自：http://www.delphifans.com/infoview/Article_6445.html
Delphi 关键字详解
absolute
//它使得你能够创建一个新变量, 并且该变量的起始地址与另一个变量相同.
var
Str: string[32];
StrLen: Byte absolute Str;
//这个声明指定了变量StrLen起始地址与Str相同.
//由于字符串的第0个位 ......
