Delphi и JNI

[-Jack-]

вместо writeln() поставил присвоение переменной:
x:=10;

и в итоге такая же ошибка

[Stilet]

Значит с профилем вызова не катит. По-моему в тех ссылках что я дал упоминалось такое.

[-Jack-]

Там такой ошибки не разбирается ...Жаль, что на Delphi почти ничего нет ... одни примеры на C++

По сути дела, если указывать некорректный путь, то будет появляться соответствующая ошибка

UnsatisfiedLinkError no MyDelphiLib2.dll in java.library.path

Т.е. это говорит о том, что java подгружает библиотеку, но вот сама библиотека оформлена неверно ...

[Stilet]

Попробуй вызови из стандартной user32 какую нить функцию WinAPI. Например MessageBox() таким образом.
Если не ошибаюсь они тоже описаны как stdcall, соответственно если нарвешься на ошибку то дело не в ДЛЛ, а в вызове из самой Явы.

[-Jack-]

Сообщение от Stilet

Попробуй вызови из стандартной user32 какую нить функцию WinAPI. Например MessageBox() таким образом.
Если не ошибаюсь они тоже описаны как stdcall, соответственно если нарвешься на ошибку то дело не в ДЛЛ, а в вызове из самой Явы.

Погрузить тот же самый MessageBox не удалось, но на 1 из заморских форумов нашел необходимую информацию ...

Всё же оказалась проблема в том, как оформлена DLL, вернее в названии функций.

При вызове функций DLL необходимо писать обвязку для этой библиотеки, т.к. функцию Java_main_HelloJNI_sayHello можно вызвать только из main.HelloJNI

да, и библиотека на С++ и на Delphi заработали !!! Класс, пойду клипать либу дальше )))Stilet, спасибо тебе )))

[Человек_Борща]

Т.е. это говорит о том, что java подгружает библиотеку, но вот сама библиотека оформлена неверно ...

При loadLibrary надо указывать только имя dll, без расширения. В зависимости от ОС, JVM сам допишет нужное расширение. Библиотеку же JVM будет искать в корневой папке Java проекта.

[Stilet]

Всё же оказалась проблема в том, как оформлена DLL, вернее в названии функций.

Не не не )))
Сам же сказал:

необходимо писать обвязку для этой библиотеки

Стало быть не в ДЛЛ проблема, а в незнании как ее вызвать в Яве )
Иначе бы получилось что все стандартные библы винды оформлены неверно - короче ржака

[-Jack-]

Короче - разобрались

[Человек_Борща]

Вы какие-то древние мануалы и технологии используете. Через JNA и интерфейсы все отлично работает.

Delphi:

library D4J;

uses
System.SysUtils;

function HelloWorldFromDelphi(x, y: Integer): Integer; stdcall;
begin
Result := x + y;
end;

function GiveNeText: PWideChar; stdcall;
begin
Result := 'РУССКИЙ RUSSIAN ТЕКСТ TEXT';
end;

exports HelloWorldFromDelphi, GiveNeText;

begin

end.

Java 1 - InterfDLL_D4J.java:

package DelphiCall;

import com.sun.jna.Library;
import com.sun.jna.Native;
import com.sun.jna.WString;

public interface InterfDLL_D4J extends Library {

	InterfDLL_D4J INSTANCE = (InterfDLL_D4J) Native.loadLibrary("D4J",
			InterfDLL_D4J.class);

	int HelloWorldFromDelphi(int x, int y);
	WString GiveNeText();

}

Java 2 - Main.java:

package DelphiCall;

import DelphiCall.*;

public class Main {

	public static void log(String sStr) {
		System.out.println(sStr);
	}

	public static void main(String[] args) {
		InterfDLL_D4J lib = InterfDLL_D4J.INSTANCE;

	    int a = 3;
	    int b = 2;
	    int result = lib.HelloWorldFromDelphi(a,b);
		log("result = " + result);
		log("GiveNeText = "+lib.GiveNeText());
	}
}

Итог out.println'ов в консоле JVM:

result = 5
GiveNeText = РУССКИЙ RUSSIAN ТЕКСТ TEXT

Недостающее в гугле

[Vapaamies]

Мне кажется, что у автора темы проблема с именованием экспортируемой функции. Оно должно точно соответствовать соглашением JNI с учетом регистра, для чего стоит задать его явно:

exports
    Java_HelloWorld_DisplayHelloWorld name 'Java_HelloWorld_displayHelloWorld';