Сервисы, блин....

[Баламут]

В общем у меня с этим проблемы.

BufSize := 0;
lpBuffer := nil;
QueryServiceConfig2(hService, SERVICE_CONFIG_DESCRIPTION, lpBuffer,
BufSize, BytesNeeded);

BufSize := BytesNeeded;
GetMem(lpBuffer, 1024);
QueryServiceConfig2(hService, SERVICE_CONFIG_DESCRIPTION, lpBuffer,
BufSize, BytesNeeded);
Move(lpBuffer^,Description,BufSize);

Проблемы начинаются тогда, когда вызываешь GetMem(lpBuffer, BytesNeed). Срабатывает только при BytesNeeded = 1024. Хотя в MSDN сказано, что после превого вызова с нулевыми буфером и его размером вернется в BytesNeeded размер, необходимый для буфера.
Ладно, это обошел (хотя до конца не понял ошибка ли это в MSDN, мой глюк или компилятора).

Сейчас пытаюсь повторить все это как
QueryServiceConfig2(hService,SERVIC E_CONFIG_FAILURE_ACTIONS,
lpBuffer,BufSize, BytesNeeded);

т.е. изменился 2-ой параметр. Манипуляции с размером буфера не помогают...
Я не расписываю все подробно, т.к. люди с этим сталкивавшиеся меня поймут. А те кто не сталкивался вряд ли полезут в MSDN.. Извините, если ошибаюсь.

[SkyM@n]

Сам когда был на винде, любил поВинАпить. Этот топик не смог обойти. А чего вы хотите добиться? А МСДН-ссылочку таки покажите

[Баламут]

MSDN у меня с диска ][akeр. Хотя до этого использовал от 2000-го года. Сейчас пока не найду. Только утром, на работе закладки есть.

[rpy3uH]

попробуй вместо
GetMem(lpBuffer, 1024);

поставить
lp:= HeapAlloc(GetProcessHeap,0,BufSize) ;
(хотя в принципе разницы нет....)

здесь есть пример получения информации о сервисе на С++. Посмотри. Что непонятно, отпишись.

[Баламут]

Видел я этот пример. У меня все тоже самое. Проблем с пониманием сишных исходников у меня вроде нет (достаточно в свое время пописал на С++). Осталось только скомпилить его на родном, так сказать, языке и посмотреть на результат. Или действительно побаловаться с выделением памяти. Может дело в аттрибуте (перемещаемая и т.д.). Буду пробовать. О результатах отпишусь

[Баламут]

В общем решил проблему. Дело как всегда оказалось в собственной невнимательности... Передал в функцию указатель, а она хочет var-параметр... Можете в меня плюнуть...

[SkyM@n]

Да бывает =)