Pessoal consegui realizar em delphi, agora em java e não sei como
fazer
Em resumo, terei uma classe que terá um método geral que será sempre chamado
quando quiser realizar alguma validaçao, ect. Para isso terei q passar para
este método o nome do método que realmente quero e no nome da classe a qual pertence
Tem o arquivo delphi em anexo, que entender as duas linguagens e quiser olhar
quem estiver disposto a me ajudar pode me adicionar no msn
sandovalmega@hotmail.com
desde ja agradeco
programa delphi e preciso converte-lo para java
[/b]
unit metodoNome;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
[b]
[b]//pessoa como consigo isso em java
TExProcedimento = procedure of object;
Tfrm_metodonome = class(TForm)
//Métodos que serão executados pelo nome
procedure metodo(Sender: TObject) ;
private
Fdata:Variant;
//Métodos de execução pelo nome
procedure procedimento(Objeto: TObject; MetodoNome: string) ;
public
{ Public declarations }
end;
var
frm_metodonome: Tfrm_metodonome;
implementation
uses VarUtils;
{$R *.dfm}
//Pessoal esse método preciso criar em JAVA
procedure Tfrm_metodonome.procedimento(Objeto: TObject; MetodoNome: string) ;
var
metodo: TMethod;
execucao: TExProcedimento;
begin
metodo.Data := Pointer(Objeto) ;
metodo.Code := Objeto.MethodAddress(MetodoNome) ;
if not Assigned(metodo.Code) then
begin
Exit;
end;
//Aqui que nao sei como fazer em java
//pois TExProcedimento é do tipo procedure of object
[color=red] execucao := TExProcedimento(metodo) ;
execucao;[/color]
end;
end.