Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Java программирование > Общие вопросы по Java, Java SE, Kotlin
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 06.12.2017, 19:58   #1
Nikas_Popandopulos
Новичок
Джуниор
 
Регистрация: 06.12.2017
Сообщений: 1
Вопрос Как вызвать Delphi-ПРОЦЕДУРУ из Java???

Delphi-функцию у меня получилось вызвать:
Java:
Код:
import com.sun.jna.Library;
import com.sun.jna.Native;

public class LibTest {
    public interface InterfDLLtest extends Library {
            //путь к файлу *.dll
        String strPathToDLL =  "...путь к delphiLibTest.dll...";
            //загрузка библиотеки - dll
        InterfDLLtest INSTANCE =  (InterfDLLtest) Native.loadLibrary(strPathToDLL, InterfDLLtest.class);
            //объявление необходимых функций dll, которые можно будет вызывать
        int sum(int a, int b);
    }
    public static void main(String[] args) {
        System.out.println(InterfDLLtest.INSTANCE.sum(1, 2));
    }
}
Delphi:
Код:
library delphiLibTest;

uses
  System.SysUtils,
  System.Classes;

{$R *.res}

function sum(a, b: integer): integer; stdcall; export;
begin
  sum:=a+b;
end;

exports sum;

begin
end.
В этом случае получилось связать функцию Delphi c Java. А как быть, если нужно представить Delphi-процедуру в Java:

Delphi:
Код:
library delphiLibTest;

uses
  System.SysUtils,
  System.Classes;

{$R *.res}

procedure sum(a, b: integer; var c: integer); stdcall; export;
begin
  c:=a+b;
end;

exports sum;

begin
end.
Помогите, пожалуйста, в интернете очень мало информации по этому...
Nikas_Popandopulos вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как вызвать процедуру? (SQL) Davis Помощь студентам 0 28.05.2013 15:10
как повторно вызвать процедуру? iiunbreakableii Общие вопросы Delphi 8 24.06.2010 13:32
как вызвать процедуру? ai\ekcah^p Паскаль, Turbo Pascal, PascalABC.NET 4 25.06.2009 11:21
Как вызвать процедуру ??? Marat Помощь студентам 8 02.03.2007 15:11