про сервисы и формы

[darkcoder]

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

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

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

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


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

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

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

[andrey4623]

Попробуй создать новую форму