Lazarus подключение .so, .dll файлов

[Diez_]

Всем доброго времени суток.

Возникла проблема при работе в Lazarus(linux) с динамическими библиотеки

На просторах интернета вычитал что в Windows, dll файлы подключаются с помощью функции LoadLibrary, возник вопрос, есть ли в linux аналог этой функции, т.к. при компиляция приложении с подключением so фалов при использовании данной функции заканчивается с ошибкой "Identifier not found "LoadLibrary""

если кто сталкивался с данной проблемой, просьба поделиться опытом, или сылкой где можно вычитать как это делать.

п.с. lazarus версии 0.90.30, в лазаре не давно, в linux тоже недавно, поэтому виню кривые руки))

//-----------------------

Все спасибо, разобрался) все моя не внимательность, забыл подключить модуль "dynlibs"

[Diez_]

подскажите как в лазаре(linux) прописать путь к .so файлу, чтобы он брал его не из тех папок которые прописаны, а из тех от куда надо мне.

за ранее спасибо.

[Diez_]

Мда театр одного актера

Уважаемые последний вопрос, помогите дураку, всю голову уже сломал

при выгрузки либы FreeLibrary() прога просто закрывается, а при подключеной либе ошибка при вызови файлового диалога "Проект ... вызвал класс исключения 'External: SIGFPE'."

[xwicked]

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

Мда театр одного актера

Уважаемые последний вопрос, помогите дураку, всю голову уже сломал

при выгрузки либы FreeLibrary() прога просто закрывается, а при подключеной либе ошибка при вызови файлового диалога "Проект ... вызвал класс исключения 'External: SIGFPE'."

Я, когда эксперементировал с Lazarus и библиотеками, работая с ними, в точном соответствии с документацией по Delphi, получал полностью рабочий код. При этом грузил двумя способами. Поэтому, если есть возможность - покажите код - проверю, при необходимости, в нескольких системах. Или тот кусок нерабочего кода.

[Diez_]

var
  NameComponent : function(num : integer) : PChar;stdcall;

.....

LibLangFile := LoadLibrary(fileName);
    if LibLangFile >= 32 then
    begin
     NameComponent := nil;
     @NameComponent := GetProcAddress(LibLangFile,'_NameComponent');
     if @NameComponent<>nil then
     begin
       Form1.Caption := NameComponent(32);
       .....
     end;
   FreeLibrary(LibLangFile);

при FreeLibrary(LibLangFile); прога просто закрывается

сама либа

library librus;

{$mode objfpc}{$H+}

uses
  Classes
  { you can add units after this };

{$R *.res}

function _NameComponent(num : integer) : Pchar;stdcall; export;
const
TMenuMenu = '....;

.....

begin
  case (num) of
  1 : _NameComponent := TMenuMenu;

   .....

  end;
end;

exports
  _NameComponent;

begin
end.

[xwicked]

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

Мда театр одного актера

Уважаемые последний вопрос, помогите дураку, всю голову уже сломал

при выгрузки либы FreeLibrary() прога просто закрывается, а при подключеной либе ошибка при вызови файлового диалога "Проект ... вызвал класс исключения 'External: SIGFPE'."

Глядя на приведённый ниже Вами код, возник вопрос: "У Вас эта функция работает из библиотеки или нет?" И что за файловый диалог? С ShareMem у Вас всё в порядке? Посмотрите вот это. Может с адресом такая же проблема...

[Diez_]

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

[xwicked]

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

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

Хорошо. Тогда я попробую воспроизвести примерную Вашу ситуацию. О результате потом напишу.

[Diez_]

за ранее спасибо за помощь)

[xwicked]

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

за ранее спасибо за помощь)

Вообщем, ситуация следующая здесь написано, что нужно писать так

@GetSimpleText := nil;

. Здесь этот момент пропущен.
У меня вот так

@GetSimpleText := nil;

вызывает ошибку, а как у Вас

GetSimpleText := nil;

всё нормально, но далее на строчке

@GetSimpleText := GetProcAddress(LibHandle,'GetSimpleText');

выдаёт ошибку, может я какой-то модуль не подключил? Скажите, пожалуйста, какие модули у Вас подключены в обоих проектах?

ЗЫ: в моей библиотеке, функция должна вернуть только одну строку PChar.

[Добавлено] В BDS 2006 всё у меня работает - пошёл курить маны по Lazarus. Что-то наверное где-то я упустил .