Скачать: CL | DM;

Ошибку выдает при работе с ДЛЛ!   Найти похожие ветки 

← →
Igel ©   (2002-10-01 11:34) [0]

Вот код в форме. При нажатии кнопки, запускается функция из ДЛЛ.

procedure TForm1.Button1Click(Sender: TObject);
var s:string;
begin
s:=test;
memo1.Lines.Add(s);
end;


Описание (статическая загрузка) ДЛЛ.

unit AsDLL;

interface

function Test :string; stdcall; external "test.dll" index 1;

implementation

end.


Вот Сама ДЛЛ:

library test;
uses
SysUtils,
Classes;

{$R *.RES}

function TTT:string; stdcall;
begin
result:="Test DLL";
end;

exports
TTT index 1 name "test";

begin
end.

Говорит: Invalid pointer operation!!
Помогите, как понять?

---

← →
qube ©   (2002-10-01 11:36) [1]

uses sharemem первой строкой в проектах ДЛЛ и приложения, а лучше PChar использовать

---

← →
Внук ©   (2002-10-01 11:37) [2]

При создании DLL там в главном файле некоторый текст писался, совершенно ненужный, насчет ShareMem :)

---

← →
Внук ©   (2002-10-01 11:37) [3]

>>qube © (01.10.02 11:36)
Лучше ShortString в данном случае, Imho

---

← →
Igel ©   (2002-10-02 09:51) [4]

Спасибо!!
Действительно, тип стринг не передает...

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.009 c