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

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

DLL и её параметры [D6]


SPeller ©   (2002-05-05 14:08:00) 

Чё-то я не понимаю. Сделал ДЛЛ-ку, в ней процедуру, которая возвращает два числа типа Double и принимает один PChar. Вот как делаю:


В основной программе:

procedure MyProc(const N1,N2:pdouble;const St:pchar);external"utdll.dll";
...
{Некоторая процедура}
var fd,ad:pdouble;
begin
new(fd);new(ad);
MyProc(fd,ad,"TmString");
{Где-то использую fd, ad}
dispose(fd);dispose(ad);
end;


В ДЛЛ-ке:

procedure MyProc(const N1,N2:pdouble;const St:pchar);
begin
...
N1^:=10.5;
N2^:=10.5; {Здесь происходит ошибка}
end;


Чего я не так делаю ??


SPeller   (2002-05-05 16:52:00) [1]

2ZZ (05.05.02 16:22)

А всё равно.

Кстати, вот уже и ошибка нашлась!
http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1020603002&n=3


ZZ   (2002-05-05 16:22:00) [2]

А если то-же самое без const ?

procedure MyProc(var N1,N2:double;const St:pchar);
...
n1:=10.5;
n2:=10.5;
...


Наверх

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