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

Вниз

NetGetJoinInformation - портирование функции   Найти похожие ветки 

 
BiN ©   (2003-12-17 11:38) [0]

Всем привет!

Проблема здесь не про сети, так что ОГРОМНАЯ просьба не пинать меня в другой форум.
Дело в том, что при вызове функции NetGetJoinInformation и дальнейшем освобождении памяти с помощью NetApiBufferFree программа вылетает во всеми нами любимый Access violation.

Может я что не правильно объявил, хотя результат функции вроде корректный. Вот кусок моего кода:

type
NETSETUP_JOIN_STATUS = DWORD;
PNETSETUP_JOIN_STATUS = ^NETSETUP_JOIN_STATUS;

function NetApiBufferFree(Buffer:Pointer):DWORD ;stdcall; external NetApi32 name "NetApiBufferFree";

function NetGetJoinInformation(lpServer:LPCWSTR;
lpNameBuffer:PLPWSTR;
BufferType:PNETSETUP_JOIN_STATUS):DWORD; stdcall; external NetApi32 name "NetGetJoinInformation";

procedure MyProc;
var
Buffer:PLPWSTR;
ntStatus:NETSETUP_JOIN_STATUS;
dwResult:DWORD;
begin
dwResult:=NetGetJoinInformation(nil, Buffer, @ntStatus);
if dwResult = NERR_SUCCESS {0} then
begin
//Buffer^ - содержит в моем случае имя домена
end;
NetApiBufferFree(Buffer);//<<<<<< Ругается и вылетает
end;

всем заранее спасибо


 
BiN ©   (2003-12-17 11:40) [1]

вдогонку:
В MSDN эта функция объявлена, как

NET_API_STATUS NetGetJoinInformation(
LPCWSTR lpServer,
LPWSTR* lpNameBuffer,
PNETSETUP_JOIN_STATUS BufferType
);

см. http://msdn.microsoft.com/library/default.asp?url=/library/en-us/netmgmt/netmgmt/netgetjoininformation.asp


 
BiN ©   (2003-12-17 11:57) [2]

Вопрос закрыт - всем спасибо



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

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

Наверх




Память: 0.47 MB
Время: 0.021 c
14-80162
димка
2004-02-01 14:09
2004.02.25
перват нажатия клавиш


3-79602
Onward
2004-02-02 13:35
2004.02.25
При переносе программы БД на другой комп, выдает ошибку.


14-80258
*pavel
2004-02-04 11:40
2004.02.25
Проходная на замке


14-80092
Ega23
2004-02-03 14:01
2004.02.25
Посоветуйте программу


6-80066
thevalery
2003-11-27 15:07
2004.02.25
broadcast и две сетевухи