Вниз
Скачать: CL | DM;

DLL   Найти похожие ветки 

← →
Kyrt ©   (2004-03-03 02:41) [0]

Расскажите, как можно вызвать в программе библиотеку DLL. Если можно на примере. Спасибо.


← →
Defunct ©   (2004-03-03 03:06) [1]

Пишем свою DLL, которая предоставляет какие-то функции для исользования в других программах:

library MyLib;

uses
SysUtils,
Classes;

// Какие-то ваши функции
Procedure DoNothing; stdcall;
Begin
End;

Function GetBy(Condidtion:Boolean; X,Y:Integer):Integer; stdcall;
Begin
If Condition Then Result := X
Else Result := Y
End;

Exports
DoNothing, GetBy;

begin
end.


Потом в своей программе подключаем функции из нашей DLL, например так:

Unit Unit1;

...

Inteface

..
Procedure DoNothing; stdcall;External " mylib.dll";
Function GetBy(Condition:Boolean; X,Y:Integer);Integer; stdcall; External " mylib.dll";
Function
..
// и используем подключенные функции, где нужно


← →
Германн ©   (2004-03-03 03:35) [2]

2 Defunct © (03.03.04 03:06) [1]
Ну Ё-моё, нигде в сабже не указано о "соглашении о вызовах" в той DLL. Ну при чем тут stdcall!
А "соглашение о вызовах", является главным при вызовах функций из DLL!


← →
Defunct ©   (2004-03-03 03:41) [3]

Германн © (03.03.04 03:35) [2]
LOL, Вы мне говорите о соглашении о вызове ;>

http://delphimaster.net/view/1-1078270175/
После "цикла Case" я подумал автор будет рад любому рабочемму примеру взаимодействия с DLL. А про "соглащение о вызовах" он сможет почитать в хелпе, если ему будет интересно.


← →
Defunct ©   (2004-03-03 03:53) [4]

btw я считаю пусть автор вопроса привыкает все делать правильно, цитата из help:
while stdcall and safecall are recommended, in general, for calls to external code.

Пусть в неявном виде, но он запомнит выделенные жирным stdcall, и возможно нажмет на них F1.


← →
Германн ©   (2004-03-03 05:10) [5]

2 Defunct © (03.03.04 03:53) [4]
Да! Если он пишет DLL.
Но из сабжа это не следует. :(((



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.019 c
1-43432
mip
2004-02-25 10:47
2004.03.14
Помогите с Word


7-43931
Лекс[КВ]
2003-12-22 14:39
2004.03.14
Принтер штрих-кода


3-43405
Alexander Smith
2004-02-13 01:22
2004.03.14
TTable, TTable.Filter


1-43611
$tranger
2004-03-02 16:49
2004.03.14
Работа с StringTable


1-43517
Grinder
2004-02-22 15:56
2004.03.14
высота колонки в list view




   Наверх