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

Вниз

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

 
Ivolg   (2004-08-20 14:09) [0]

Привет всем. Я подключил длл вот мою так: h:=LoadLibRary("D:\My.dll");.
Вопрос: Как можно испльзовать мою функцию которая лежит в делл. Спасибо!!!


 
[lamer]Barmaglot ©   (2004-08-20 14:13) [1]

FAQ?

http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988621309&n=15

P.S.Ну народ ленивый пошел, даже в фак посмотреть не хочет...не говорю о том чтобы книжки почитать...


 
Суслик ©   (2004-08-20 14:16) [2]

тут рядом в 5 см. есть топик "DLL" - там есть ответ


 
Ivolg   (2004-08-20 14:22) [3]

Не пойму в факе.


 
Суслик ©   (2004-08-20 14:25) [4]

Все не понятно или не понятно, что не понятно?
Вопрос в чем?


 
[lamer]Barmaglot ©   (2004-08-20 14:28) [5]

Ну что не понятно? Замени GetTime везде где она встречается на имя своей функции и будет тебе счастье...
Если и после этого не пойдет то надо читать книги...


 
panov ©   (2004-08-20 14:50) [6]

Вот пример готового модуля для подключения DLL.
Разберись и будет тебе щастье.


unit proc;

interface
uses windows,sysutils,classes;


const _MyLibraryName ="..\dll\proc.dll"; //имя библиотеки
var
 hLib: THandle;

 ExecCmd:        procedure(const aCommand: String;const aShow, aWaitExit: Boolean);

procedure LoadLib;
procedure UnloadLib;

implementation

procedure LoadLib;
begin
 if hLib<>0 then Exit;
 hLib := LoadLibrary(PChar(_MyLibraryName));
 if (hLib=0) then
 begin
   raise Exception.Create("Не могу загрузить библиотеку "+_MyLibraryName);
   Exit;
 end;

 @ExecCmd :=             GetProcAddress(hLib,"ExecCmd");
end;

procedure UnloadLib;
begin
 FreeLibrary(hLib);
 hLib := 0;
end;

initialization
 hLib := 0;
end.




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

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

Наверх




Память: 0.48 MB
Время: 0.025 c
14-1092296755
nikkie
2004-08-12 11:45
2004.09.05
критика кода DMClient


14-1092794139
Думкин
2004-08-18 05:55
2004.09.05
С днем рождения! 18 августа


3-1092303260
Goffman
2004-08-12 13:34
2004.09.05
Исключить поле из update


14-1092598614
QuestionX
2004-08-15 23:36
2004.09.05
Интернет в Европе


3-1092312735
sesh
2004-08-12 16:12
2004.09.05
PostgreSQL