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

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

VCL и KOL

Страницы:   < 1 2 >

AlexM ©   (2007-01-19 07:45:00) 

Почему когда в
demomodalvcl2koldll.7z
вместо

procedure CallKOLFormModal; external 'KOLDll.dll' name 'CallKOLFormModal';

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
 CallKOLFormModal;
end;

написать

//procedure CallKOLFormModal; external 'KOLDll.dll' name 'CallKOLFormModal';
{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
type
 PCallKOLFormModal=procedure;
var
 hDll:THandle;
 CallKOLFormModal:PCallKOLFormModal;
begin
if(FileExists('KOLDLL.dll' ))then
 begin
   hDll:=LoadLibrary('KOLDLL.dll');
   @CallKOLFormModal:=GetProcAddress(hDll,'CallKOLFormModal');
   CallKOLFormModal;
   freeLibrary(hDll);
 end;
end;

при выходе вылазит ошибка?
Как это исправить?

---

Vladimir Kladov   (2007-01-20 10:40:00) [21]

А  если отлаживать со стороны dll, подключая основное приложение как host?

---

AlexM   (2007-01-20 07:44:00) [22]

Project VCLProject1.exe raised exception class EACcessViolation
with message 'Access violation at address 003C20C0. Read of address 003C20C0.'

Если freeLibrary(hDll) не делать, то ошибки нет.

---

Vladimir Kladov   (2007-01-19 14:31:00) [23]

Какая ошибка? Или отладчик ничего не говорит?

---

Страницы:   < 1 2 >

Наверх