Помощник
Здравствуйте, гость ( Вход | Регистрация )
|
|
10:03:2008, 21:28
|
|
Новенький ![]() Группа: Программист Сообщений: 19 Регистрация: 31:03:2007 Пользователь №: 9 988 Репутация: 0
|
привет
написал сервис работает. понадобилось сделать форму на нем 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; получается что из "консольного" кода нельзя обратиться к компоненту на форме? если можно то как правильно написать?? Сообщение отредактировал darkcoder - 11:03:2008, 08:49 |
|
Сообщение
#1
|
|
![]() |
|
|
11:03:2008, 06:40
|
|
============== ![]() ![]() ![]() ![]() ![]() Группа: Модеры Сообщений: 1 740 Регистрация: 11:01:2007 Пользователь №: 8 750 Специализация: specialist Репутация: 27
|
А что есть сервис?
PS: форматировать топики когда научимся? |
|
Сообщение
#2
|
|
|
|
11:03:2008, 08:50
|
|
Новенький ![]() Группа: Программист Сообщений: 19 Регистрация: 31:03:2007 Пользователь №: 9 988 Репутация: 0
|
сервис он и есть сервис
|
|
Сообщение
#3
|
|
|
|
11:03:2008, 08:56
|
|
============== ![]() ![]() ![]() ![]() ![]() Группа: Модеры Сообщений: 1 740 Регистрация: 11:01:2007 Пользователь №: 8 750 Специализация: specialist Репутация: 27
|
хм ... я надеялся что вы почитаете для начала
ну в 2 словах: форму в сервисе сделать не то чтобы сложно, но врядли нужно. Поэтому вопрос таков, зачем форма в этом самом сервисе? |
|
Сообщение
#4
|
|
|
|
11:03:2008, 09:17
|
|
Новенький ![]() Группа: Программист Сообщений: 19 Регистрация: 31:03:2007 Пользователь №: 9 988 Репутация: 0
|
я читал, на английском правда
там тоже сказано что не нужно но как тогда мне использовать webbrowser на сервисе? как его можно подключить кроме как кинув на форму которую в данном случае нельзя использовать? |
|
Сообщение
#5
|
|
|
|
11:03:2008, 09:39
|
|
============== ![]() ![]() ![]() ![]() ![]() Группа: Модеры Сообщений: 1 740 Регистрация: 11:01:2007 Пользователь №: 8 750 Специализация: specialist Репутация: 27
|
Для использования webbrowser - форма не обязательна.
|
|
Сообщение
#6
|
|
|
|
11:03:2008, 09:59
|
|
Новенький ![]() Группа: Программист Сообщений: 19 Регистрация: 31:03:2007 Пользователь №: 9 988 Репутация: 0
|
а как? в какую сторону копать?
|
|
Сообщение
#7
|
|
|
|
11:03:2008, 10:07
|
|
============== ![]() ![]() ![]() ![]() ![]() Группа: Модеры Сообщений: 1 740 Регистрация: 11:01:2007 Пользователь №: 8 750 Специализация: specialist Репутация: 27
|
В справку вестимо. Смотреть что надо, чтобы TWebBrowser работал без формы и т.д. Кстати а зачем вам он в сервисе, чисто пробы?
Да, и тот код, который вы показываете на др. форумах - нерабочий, по нему видно, что он не совсем ваш. PS: Я бы вам посоветовал идти от малого к сложному, и по дороге все прояснится. |
|
Сообщение
#8
|
|
|
|
11:03:2008, 10:26
|
|
Новенький ![]() Группа: Программист Сообщений: 19 Регистрация: 31:03:2007 Пользователь №: 9 988 Репутация: 0
|
В справку вестимо. Смотреть что надо, чтобы TWebBrowser работал без формы и т.д. Кстати а зачем вам он в сервисе, чисто пробы? Да, и тот код, который вы показываете на др. форумах - нерабочий, по нему видно, что он не совсем ваш. PS: Я бы вам посоветовал идти от малого к сложному, и по дороге все прояснится. код рабочий. вместо wb я ставил функцию для записи в файл test('строка которую записать') в каждой функции в коде и после каждого условия я ставил дамп в лог, с описанием что происходит ставится он нормально и запускается сразу же после перезагрузки в логе отписываются старты тестовой функции так что все нормально код не мой, мне нужно оживить этот и потом уже писать свой нормальный ну а как идти, я работаю с утра до ночи последние три года, сейчас серваки куплены все настроено осталось дело за малым этот код написать код мне этот для накрутки |
|
Сообщение
#9
|
|
|
|
11:03:2008, 10:54
|
|
============== ![]() ![]() ![]() ![]() ![]() Группа: Модеры Сообщений: 1 740 Регистрация: 11:01:2007 Пользователь №: 8 750 Специализация: specialist Репутация: 27
|
Тот что показали - нерабочий. Кстати есть еще компоненты от Indy, тоже можно на них посмотреть.
|
|
Сообщение
#10
|
|
|
|
11:03:2008, 11:18
|
|
Новенький ![]() Группа: Программист Сообщений: 19 Регистрация: 31:03:2007 Пользователь №: 9 988 Репутация: 0
|
Тот что показали - нерабочий. Кстати есть еще компоненты от Indy, тоже можно на них посмотреть. ну да, тот не запускается а с дампом в текстовый файл пашет сейчас попробую через длл сделать незнаю насчет indy, я саму идею подсмотрел у одной малвары, отреверсил ее, там примерно так сделано только не через сервис а через автозагрузку. через сервис имхо лучше если еще добавить блокировку файла и ф-цию p2p червя чтоб пробывал сам себя копировать в папки обмена под разными именами так вообще отлично выйдет Сообщение отредактировал darkcoder - 11:03:2008, 11:18 |
|
Сообщение
#11
|
|
|
|
11:03:2008, 12:48
|
|
============== ![]() ![]() ![]() ![]() ![]() Группа: Модеры Сообщений: 1 740 Регистрация: 11:01:2007 Пользователь №: 8 750 Специализация: specialist Репутация: 27
|
не понял, про какого червя речь?
|
|
Сообщение
#12
|
|
|
|
11:03:2008, 12:56
|
|
Божественный ![]() ![]() ![]() ![]() ![]() Группа: Модеры Сообщений: 1 816 Регистрация: 4:09:2006 Из: Минск Пользователь №: 6 316 Специализация: C++ Репутация: 31
|
|
|
Сообщение
#13
|
|
|
|
11:03:2008, 13:03
|
|
============== ![]() ![]() ![]() ![]() ![]() Группа: Модеры Сообщений: 1 740 Регистрация: 11:01:2007 Пользователь №: 8 750 Специализация: specialist Репутация: 27
|
тогда прикроем темку, пока не началось
|
|
Сообщение
#14
|
|
![]() |
|
Текстовая версия | Сейчас: 17:05:2008 - 04:27 |