Форум: "Начинающим";
Текущий архив: 2005.12.04;
Скачать: [xml.tar.bz2];

Вниз

Длл и ^TData   Найти похожие ветки 

← →
DillerXX ©   (2005-11-17 20:40) [0]


library Testing;
function Test(): Integer; stdcall; export;
Type
 PGlobalDLLData = ^TGlobalDLLData;
 TGlobalDLLData = packed record
 MyAppWnd: integer;
 end;
var
 MyData : PGlobalDLLData;
 t : integer;
begin
MyData^.MyAppWnd:=5;
ShowMessage("Hello");
Result := 0;
end;
exports
 Test name "_test";
begin
end.

Почему данный код выдаёт ошибку при присвоении, что надо сделать, чтобы ошибки не возникало? При чём такое присвоение нормально работает в приложении, но почему-то в длл вызывает ошибку. Заранее спасибо.

---

← →
begin...end ©   (2005-11-17 20:47) [1]

Не видно выделения памяти для MyData.

---

← →
DillerXX ©   (2005-11-17 20:48) [2]

простите, загнался :( уже много часов подряд пишу, сдвиг какойто... new забыл... сорри люди

---

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

Форум: "Начинающим";
Текущий архив: 2005.12.04;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.034 c