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

Вниз

Проблемма с DLL   Найти похожие ветки 

 
Dmitriy_R   (2003-03-04 12:58) [0]

Подскажите где ошибка. Взял пример из форума запустил все работает но в одном месте происходит ошибка.
Программа выполнила недопустимую операцию и будет закрыта.
вот пример кода:

begin
{"Чистим" адрес функции от "грязи"}
@GetSimpleText := nil;
{Пытаемся загрузить библиотеку}
LibHandle := LoadLibrary("MYDLL.DLL");
{Если все OK}
if LibHandle >= 32 then begin
{...то пытаемся получить адрес функции в библиотеке}
@GetSimpleText := GetProcAddress(LibHandle,"GetSimpleText");
{Если и здесь все OK}
if @GetSimpleText <> nil then
{...то вызываем эту функцию и показываем результат}
ShowMessage(StrPas(GetSimpleText(True)));
end;
{И не забываем освободить память и выгрузить DLL}
FreeLibrary(LibHandle);
ShowMessage("Memori Free.");
end; // вот здесь и происходит ошибка.


 
dim- ©   (2003-03-04 14:22) [1]

у меня такое было, не поставил free для формы в DLLке и TStringList.Free
Может поможет



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

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

Наверх




Память: 0.46 MB
Время: 0.019 c
7-39593
AuX
2002-12-18 21:59
2003.03.13
Смена IP сетевухи в винь без перезагруза машины.


3-39226
{{{KOTOS}}}
2003-02-23 12:03
2003.03.13
Какая БД с BLOB сохраняет в одном файле? или как мне сделать чтоб


1-39314
Avsam
2003-03-04 12:27
2003.03.13
MessageDlg и язык кнопок


4-39625
Matrex
2003-01-22 21:42
2003.03.13
Работа с файлами


1-39412
GROL
2003-03-02 12:41
2003.03.13
Как восстановить текст компонент?