информационная безопасность
без паники и всерьез
 подробно о проектеRambler's Top100
Все любят медЗа кого нас держат?
BugTraq.Ru
Русский BugTraq
 Анализ криптографических сетевых... 
 Модель надежности двухузлового... 
 Специальные марковские модели надежности... 
 Notepad++ полгода раздавал зараженные... 
 Китайский прорыв из ESXi 
 С наступающим 
главная обзор RSN блог библиотека закон бред форум dnet о проекте
bugtraq.ru / форум / programming
Имя Пароль
ФОРУМ
если вы видите этот текст, отключите в настройках форума использование JavaScript
регистрация





Легенда:
  новое сообщение
  закрытая нитка
  новое сообщение
  в закрытой нитке
  старое сообщение
  • Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
  • Новичкам также крайне полезно ознакомиться с данным документом.
[Delphi] например так 19.02.04 19:27  Число просмотров: 1537
Автор: Cyril <sc> Статус: Member
<"чистая" ссылка>
> Нужно вызвать функцию из JSProxy.dll :
> Вот так выглядит прототип на си++:
> BOOL InternetInitializeAutoProxyDll(
> DWORD dwReserved
> );
>
> Как сделать вызов к ней на делфи?
> Большое спасибо!
type
TInternetInitializeAutoProxyDll =
function (dwReserved : DWORD) : boolean; stdcall;
var
InternetInitializeAutoProxyDll : TInternetInitializeAutoProxyDll = nil;
begin
Handle := LoadLibrary('JSProxy.dll');
Win32Check(Handle);
try
@InternetInitializeAutoProxyDll :=
GetProcAddress(Handle, 'InternetInitializeAutoProxyDll');
Win32Check(@InternetInitializeAutoProxyDll <> nil);
InternetInitializeAutoProxyDll(0);
finally
FreeLibrary(Handle) ;
@InternetInitializeAutoProxyDll := nil; // необязательно
end;
end;
<programming>
[Delphi] вызов функции из стандартной dll-ки винды 19.02.04 15:53  
Автор: wade Статус: Незарегистрированный пользователь
<"чистая" ссылка>
Нужно вызвать функцию из JSProxy.dll :
Вот так выглядит прототип на си++:
BOOL InternetInitializeAutoProxyDll(
DWORD dwReserved
);

Как сделать вызов к ней на делфи?
Большое спасибо!
[Delphi] Или статически прилинкуй, еслли динамика напрягает (внутри)... 24.02.04 09:01  
Автор: HandleX <Александр М.> Статус: The Elderman
<"чистая" ссылка>
> Нужно вызвать функцию из JSProxy.dll :
> Вот так выглядит прототип на си++:
> BOOL InternetInitializeAutoProxyDll(
> DWORD dwReserved
> );
>
> Как сделать вызов к ней на делфи?
> Большое спасибо!

Сразу после строки Implementation в модуле пишешь:
Function InternetInitializeAutoProxyDll(dwReserved: DWORD): BOOL; StdCall; External 'JSProxy.dll';

---
В принципе, не понимаю в чем сложность? Только в том, что ты... 22.02.04 12:44  
Автор: TMind Статус: Незарегистрированный пользователь
<"чистая" ссылка>
В принципе, не понимаю в чем сложность? Только в том, что ты ни разу в Дехлях ДЛЛ не экспортировал или нет?

Если подразумевается то, что GetProcAddress возвращает NULL ( nil :),
то возможно трабла в коррекции имен т.е.: в Сях, если не указан модификатор стандарта, имя идентификатора функции экспортируемой ДЛЛ, выглядит примерно так MyFunc$<xxx>, где <ххх> - сокр. описание параметров и возвращемого значения.

Если трабла в этом, то:
1) Если библиотека написана тобой, то описывай экспортируемую функцию так:
extern "C" <RetValType> __declspec(dllexport) __stdcall <FuncName><FuncParams>

2)Если нет, то посмоти утилой типа qview (простейшая) эту библиотеку, и там найди под каким именем она (функция) экспортирутся.
[Delphi] например так 19.02.04 19:27  
Автор: Cyril <sc> Статус: Member
<"чистая" ссылка>
> Нужно вызвать функцию из JSProxy.dll :
> Вот так выглядит прототип на си++:
> BOOL InternetInitializeAutoProxyDll(
> DWORD dwReserved
> );
>
> Как сделать вызов к ней на делфи?
> Большое спасибо!
type
TInternetInitializeAutoProxyDll =
function (dwReserved : DWORD) : boolean; stdcall;
var
InternetInitializeAutoProxyDll : TInternetInitializeAutoProxyDll = nil;
begin
Handle := LoadLibrary('JSProxy.dll');
Win32Check(Handle);
try
@InternetInitializeAutoProxyDll :=
GetProcAddress(Handle, 'InternetInitializeAutoProxyDll');
Win32Check(@InternetInitializeAutoProxyDll <> nil);
InternetInitializeAutoProxyDll(0);
finally
FreeLibrary(Handle) ;
@InternetInitializeAutoProxyDll := nil; // необязательно
end;
end;
1




Rambler's Top100
Рейтинг@Mail.ru


  Copyright © 2001-2026 Dmitry Leonov   Page build time: 0 s   Design: Vadim Derkach