Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.08.16;
Скачать: CL | DM;

Вниз

Структура в Dll   Найти похожие ветки 

 
Alexander3   (2009-06-19 19:55) [0]

Функция в dll
function GetCardInfo( Card: DWORD; Info: PCardInfo ): Integer; stdcall; export;
begin
if  Card <> 5 then
   begin
        Result := 0;
        with Info^ do begin
         Deleted  := 0;
          Discount := 10;
          Bonus    := 5;
         Summa    := 2000000;
      Holder   := "Иванов Иван Иванович";

end;
      end
   else
      begin
        Result := 1;
      end;
 end;
Вызов из приложения  GetCardInfo( 6,info );
получаю Access violation почему ?


 
Игорь Шевченко ©   (2009-06-19 20:05) [1]

ShareMem ?


 
Сергей М. ©   (2009-06-19 20:16) [2]


> получаю Access violation почему ?


Об этом тебе говорит at address


 
Alexander3   (2009-06-19 20:35) [3]

Спасибо за помощь
Правда at adress 000004 не знаю о чем может сказать
Sharemem возможно пригодится дальше на самом деле проблемма была в том что я память не выделил
info:=New(PCardInfo);


 
Дмитрий Белькевич   (2009-06-22 14:51) [4]

>Правда at adress 000004 не знаю о чем может сказать

Как минимум о том, что обращаешься к неинициализированному указателю, т.е. nil"у.


 
Плохиш ©   (2009-06-22 15:15) [5]


> на самом деле проблемма была в том что я память не выделил

Это, типа, теста такого было для телепаторов?



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

Текущий архив: 2009.08.16;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
15-1245117148
brother
2009-06-16 05:52
2009.08.16
функция Exel


15-1244611324
pasha_golub
2009-06-10 09:22
2009.08.16
Не пойму сути компонентов а-ля TTransaction


2-1245516025
Nikfel
2009-06-20 20:40
2009.08.16
Как сделать прозрачным главное меню пуск?


2-1245319637
lewka
2009-06-18 14:07
2009.08.16
Word.application


15-1245343464
pavel_guzhanov
2009-06-18 20:44
2009.08.16
Есть пример программы на Q-basic. Как перевести в Delphi?