Einzelnen Beitrag anzeigen

wschrabi

Registriert seit: 16. Jan 2005
448 Beiträge
 
#1

JAVA code in Delphi

  Alt 8. Apr 2017, 06:56
Hi
Habe mit JavaToPas Converte ein .class file in ein PAS (interface) FIle convertiert.
Doch mein Delphi 10.2 daß beim KOmpilieren auf einer WIN32 Platform die JNI Bridge (AndroidAPI.JNIBridge, ..) nicht conform ist. Wie kann ich dieses Java class file in Delphi ansprechen?

Delphi-Quellcode:
//
// Generated by JavaToPas v1.4 20170408 - 064725
// *** unregistered evaluation copy ***
////////////////////////////////////////////////////////////////////////////////
unit quineMccluskey.QuineMcCluskeyAlgorithm;

interface

uses
  AndroidAPI.JNIBridge,
  Androidapi.JNI.JavaTypes;

type
  JQuineMcCluskeyAlgorithm = interface;

  JQuineMcCluskeyAlgorithmClass = interface(JObjectClass)
    ['{839A79CA-FC92-4947-9FBF-B6415B175C86}']
    function compare_adjacent_minterms(group_wise : TJavaArray<TJavaArray<JString>>) : TJavaArray<TJavaArray<JString>>; cdecl;// ([[Ljava/lang/String;)[[Ljava/lang/String; A: $9
    function fill_1d_array(filling_array : TJavaArray<JString>) : TJavaArray<JString>; cdecl;// ([Ljava/lang/String;)[Ljava/lang/String; A: $9
    function fill_1d_int_array(temp_array : TJavaArray<Integer>) : TJavaArray<Integer>; cdecl;// ([I)[I A: $9
    function fill_arrays(all_combined : TJavaArray<TJavaArray<JString>>) : TJavaArray<TJavaArray<JString>>; cdecl;// ([[Ljava/lang/String;)[[Ljava/lang/String; A: $9
    function fill_dontcare(input_min : TJavaArray<JString>) : TJavaArray<JString>; cdecl;// ([Ljava/lang/String;)[Ljava/lang/String; A: $9
    function fill_dontcares(filling_array : TJavaArray<TJavaArray<JString>>) : TJavaArray<TJavaArray<JString>>; cdecl;// ([[Ljava/lang/String;)[[Ljava/lang/String; A: $9
    function fill_int_arrays(all_combined : TJavaArray<TJavaArray<Integer>>) : TJavaArray<TJavaArray<Integer>>; cdecl;// ([[I)[[I A: $9
    function fill_minterms(input_min : TJavaArray<JString>) : TJavaArray<TJavaArray<JString>>; cdecl;// ([Ljava/lang/String;)[[Ljava/lang/String; A: $9
    function get_bits(min_array : TJavaArray<Integer>) : Integer; cdecl; // ([I)I A: $9
    function get_essential_primes : TJavaArray<TJavaArray<JString>>; cdecl; // ()[[Ljava/lang/String; A: $9
    function get_primes(temp_prime_calc : TJavaArray<TJavaArray<JString>>) : TJavaArray<TJavaArray<JString>>; cdecl;// ([[Ljava/lang/String;)[[Ljava/lang/String; A: $9
    function init : JQuineMcCluskeyAlgorithm; cdecl; // ()V A: $1
    function scan_minterms : TJavaArray<Integer>; cdecl; // ()[I A: $9
    function to_binary(min_array : TJavaArray<Integer>) : TJavaArray<JString>; cdecl;// ([I)[Ljava/lang/String; A: $9
    function to_binary_string(integer_val : Integer) : JString; cdecl; // (I)Ljava/lang/String; A: $9
    procedure complete_methods ; cdecl; // ()V A: $9
    procedure give_output(output_array : TJavaArray<JString>) ; cdecl; // ([Ljava/lang/String;)V A: $9
    procedure main(args : TJavaArray<JString>) ; cdecl; // ([Ljava/lang/String;)V A: $9
    procedure prime_fill(result : JString; op1 : JString; op2 : JString) ; cdecl;// (Ljava/lang/String;Ljava/lang/String;Ljava/lang/String;)V A: $9
    procedure remove_duplicate_primes ; cdecl; // ()V A: $9
  end;

  [JavaSignature('quineMccluskey/QuineMcCluskeyAlgorithm')]
  JQuineMcCluskeyAlgorithm = interface(JObject)
    ['{488C131B-815F-42BD-8492-CA48F21CD7E5}']
  end;

  TJQuineMcCluskeyAlgorithm = class(TJavaGenericImport<JQuineMcCluskeyAlgorithmClass, JQuineMcCluskeyAlgorithm>)
  end;

implementation

end.
  Mit Zitat antworten Zitat