Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Структура в Dll [D7, WinXP]


Alexander3 ©   (2009-06-19 19:55:00) 

Функция в 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-22 15:15:00) [1]


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

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


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

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

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


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

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


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


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


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


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

ShareMem ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо