Тема: Сервис
Показать сообщение отдельно
  #1  
Старый 09.06.2008, 18:27
Аватар для Sharky
Sharky Sharky вне форума
Активный
 
Регистрация: 20.03.2007
Сообщения: 202
Репутация: 10
По умолчанию Сервис

Привет народ , помогите мне пожалуйста освоить написание сервиса

Прошу расказать мне что делают эта функция и процидура
Код:
procedure ServiceController(CtrlCode: DWord); stdcall;
begin
  Service1.Controller(CtrlCode);
end;

function TService1.GetServiceController: TServiceController;
begin
  Result := ServiceController;
end;

Admin: Пользуемся тегами!

почемуто пытаюсь написать что то очень мего простое но проект откомпилировать нельзя раскажите что занете буду рад любой информации.
Ответить с цитированием