Developing.ru

привет
написал сервис
работает.
понадобилось сделать форму на нем c webbrowserom
переписал сервис из program в unit

но вот проблема, как мне вызвать процедуру запуска webbrowsera?

кусок кода запуска сервиса
procedure ServiceProc(Argc: DWORD; var Argv: array of PChar); stdcall;
var
t:integer;
begin
ServiceStatus.dwServiceType := SERVICE_WIN32;
....
SetServiceStatus(ServiceStatusHandle, ServiceStatus);
TEST(); - тут нужно запустить webbrowser который лежит на форме
end;

что я не пытался сделать, и sender tobject, и без, и так и сяк, вобщем неполучается
запустить TEST


примерно как выглядит функция TEST:

procedure test(Sender: TObject);
begin
EmbeddedWB1.Navigate('http://localhost/test.php');
end;

получается что из "консольного" кода нельзя обратиться к компоненту на форме?
если можно то как правильно написать??

А если написать естественно добавив юнит формы в uses?
(я сам сервисы "с нуля" не писал, только через TService).

А если не получится, можно запихнуть форму с браузером в отдельную DLL и запускать оттуда.