Текущий архив: 2006.10.15;
Скачать: CL | DM;
Вниз
вызов "приплюснутой" функции Найти похожие ветки
← →
Sam Stone © (2006-09-27 18:32) [0]Доброго всем времени суток. Как описать и вызвать в дельфи след. ф-цию
HRESULT GetNetScheduleAccountInformation(
LPCWSTR pwszServerName,
DWORD ccAccount,
WCHAR wszAccount[]
);
wszAccount
[out] Array of wide characters, including the null-terminator, that receives the account information. ?
Лежит в Mstask.dll
Описание swzAccount как widestring, pwidestring, widechar, pwidechar не помогло :(
← →
umbra © (2006-09-27 19:16) [1]
pwidechar, по идее, должно было помочь
← →
Sam Stone © (2006-09-27 19:32) [2]Где я тут накосячил? Наверняка что-то глупое.
var f:function(s:PWideChar;L:DWORD;O:PWideChar):HRESULT;stdcall;
h:THandle;
st:pwidechar;
begin
h:=LoadLibrary("mstask.dll");
f:=GetProcAddress(h,"GetNetScheduleAccountInformation");
if f(nil,64,st)=S_OK then //ф-ция возвращает S_OK если учетка не SYSTEM и инфа положена в "O";
ShowMessage(st);//абракадабра :(
end;
Страницы: 1 вся ветка
Текущий архив: 2006.10.15;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.031 c
