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

Вниз

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

 
Jay1982 ©   (2004-12-27 16:16) [0]

Как не используя юнит вытянуть функцию/процедуру из ДЛЛ, в юните делаю так:

interface

procedure Sleep(ms: LongWord); stdcall;

implementation

procedure Sleep; external "kernel32.dll" name "Sleep";

всё работает, но для этого надо создавать дополнительный юнит


 
Sandman25 ©   (2004-12-27 16:19) [1]

LoadLibrary


 
Jay1982 ©   (2004-12-27 16:24) [2]

Об этом я тоже вкурсе, думал может макаром описанным мною выше как-то можно


 
Sandman25 ©   (2004-12-27 16:26) [3]

Можно написать procedure Sleep; external "kernel32.dll" name "Sleep"; прямо перед вызовом, тогда дополнительный модуль не понадобится


 
Jay1982 ©   (2004-12-27 16:31) [4]

Но в этом случае процедуре не передаются параметры


 
Sandman25 ©   (2004-12-27 16:32) [5]

procedure Sleep(ms: LongWord); stdcall; external "kernel32.dll" name "Sleep";

external + F1


 
Jay1982 ©   (2004-12-27 16:39) [6]

Так вроде писал но вместо задержки указаной в милисекундах получилась вечная задержка


 
Fay ©   (2004-12-27 16:40) [7]

Ошибка в 17-й строке


 
Jay1982 ©   (2004-12-27 16:41) [8]

Написал так

procedure Sleep(ms: Cardinal); stdcall; external "kernel32.dll" name "Sleep";

Всё работает, спасибо за советы


 
Jay1982 ©   (2004-12-27 16:43) [9]

2 Sandman25 - Видимо что-то пропускал;
2 Fay - я писал всего одну, а не 17


 
Fay ©   (2004-12-27 16:46) [10]

А, понятно.



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

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

Наверх




Память: 0.46 MB
Время: 0.046 c
1-1104668333
byte
2005-01-02 15:18
2005.01.16
Поделитесь, если есть, опытом


14-1103232581
Lancelot
2004-12-17 00:29
2005.01.16
Учусь в автошколе


1-1104358483
ariec
2004-12-30 01:14
2005.01.16
рег компонента


14-1103808425
Koala
2004-12-23 16:27
2005.01.16
Срочно!!! посоветуйте аппарат....


14-1104383875
КаПиБаРа
2004-12-30 08:17
2005.01.16
Вера в разум тоже религия?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский