Delphi事件处理过程机制如何应用到Java中?
//事件处理过程定义//
public interface Click{
/**
* Delphi:
* procedure ClickEvent(Sender:TObject) of object;
*/
public void ClickEvent(Object Sender);
}
//执行外部类的事件处理过程//
public class Shape{
/**
* Delphi:
* e:ClickEvent;
*/
private Click e = null;
public void DoClick(){
if (e != null){
e.ClickEvent(this);
}
}
/**
* Delphi:
* function getClick:ClickEvent;
*/
public Click getClick(){
return e;
}
/**
* Delphi:
* procedure setClick(Value:ClickEvent);
*/
public void setClick(Click Value){
e = Value;
}
}
//外部类实现事件处理过程的流程//
public class Caller implements Click{
/**
* 调用:Shape aShape = new Shape;
* aShape.setClick(this);
* Delphi:
* procedure ClickEvent(Sender:TObject);
* begin
* end;
* 问题:如何实现多个具有相同定义的事件处理过程实例?
* 例如:
* public void ClickEvent1(Object Sender){
* }
* public void ClickEvent2(Object Sender){
* }
*/
public void ClickEvent(Object Sender){
}
}
如何实现多个具有相同定义的事件处理过程实例?
public interface Click{
/**
* Delphi:
* procedure ClickEvent(Sender:TObject) of object;
*/
public void ClickEvent(Object Sender);
}
//执行外部类的事件处理过程//
public class Shape{
/**
* Delphi:
* e:ClickEvent;
*/
private Click e = null;
public void DoClick(){
if (e != null){
e.ClickEvent(this);
}
}
/**
* Delphi:
* function getClick:ClickEvent;
*/
public Click getClick(){
return e;
}
/**
* Delphi:
* procedure setClick(Value:ClickEvent);
*/
public void setClick(Click Value){
e = Value;
}
}
//外部类实现事件处理过程的流程//
public class Caller implements Click{
/**
* 调用:Shape aShape = new Shape;
* aShape.setClick(this);
* Delphi:
* procedure ClickEvent(Sender:TObject);
* begin
* end;
* 问题:如何实现多个具有相同定义的事件处理过程实例?
* 例如:
* public void ClickEvent1(Object Sender){
* }
* public void ClickEvent2(Object Sender){
* }
*/
public void ClickEvent(Object Sender){
}
}
如何实现多个具有相同定义的事件处理过程实例?
...全文
相关推荐
Delphi的事件如何设置一个以上的事件处理者?
Delphi的事件如何设置一个以上的事件处理者?方法非常简单。
Delphi(delphi7-XE)标准RSA加密,解密,签名.与C,Java,php等通用
Delphi-XE RSA加密,解密,签名.密钥对生成工具.与C,Java,php等互通加解密
Delphi XE7调用JAVA的JAR
现在很多都是提供jar包,使用Delphi的同学们习惯于调用dll,附件就是一个通过DELPHI XE7调用JAVA的JAR的例子
delphi通过JNI调用JAVA函数
delphi通过JNI调用JAVA函数的一个小DEMO
delphi,java des算法通用加解密源码
delphi和java都是从网上下的源码,将delphi的修改了一下。目前没发现什么问题,加密、解密可以通用。


Java SE
