Форум программистов CODEBY.NET Хостинг в Беларуси — Active Technologies

Разработка бизнес сайтов

Нужны клиенты? Тогда сюда быстрее...
X   Сообщение сайта
(Сообщение закроется через 2 секунды)

Здравствуйте, гость ( Вход | Регистрация )




> про сервисы и формы
darkcoder
Вставить ник
сообщение 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
 
Новая тема 
Ответов (1 - 13)
sax_ol
Вставить ник
сообщение 11:03:2008, 06:40
Цитата Ответить 


==============
*****

Группа: Модеры
Сообщений: 1 740
Регистрация: 11:01:2007
Пользователь №: 8 750
Специализация: specialist



Репутация: - 27 +


А что есть сервис?

PS: форматировать топики когда научимся?
Подняться вверх 
 
Сообщение #2
darkcoder
Вставить ник
сообщение 11:03:2008, 08:50
Цитата Ответить 


Новенький
*

Группа: Программист
Сообщений: 19
Регистрация: 31:03:2007
Пользователь №: 9 988



Репутация: - 0 +


сервис он и есть сервис blink.gif
Подняться вверх 
 
Сообщение #3
sax_ol
Вставить ник
сообщение 11:03:2008, 08:56
Цитата Ответить 


==============
*****

Группа: Модеры
Сообщений: 1 740
Регистрация: 11:01:2007
Пользователь №: 8 750
Специализация: specialist



Репутация: - 27 +


хм ... я надеялся что вы почитаете для начала
ну в 2 словах: форму в сервисе сделать не то чтобы сложно, но врядли нужно.
Поэтому вопрос таков, зачем форма в этом самом сервисе?
Подняться вверх 
 
Сообщение #4
darkcoder
Вставить ник
сообщение 11:03:2008, 09:17
Цитата Ответить 


Новенький
*

Группа: Программист
Сообщений: 19
Регистрация: 31:03:2007
Пользователь №: 9 988



Репутация: - 0 +


я читал, на английском правда
там тоже сказано что не нужно

но как тогда мне использовать webbrowser на сервисе? как его можно подключить кроме как кинув на форму которую в данном случае нельзя использовать?
Подняться вверх 
 
Сообщение #5
sax_ol
Вставить ник
сообщение 11:03:2008, 09:39
Цитата Ответить 


==============
*****

Группа: Модеры
Сообщений: 1 740
Регистрация: 11:01:2007
Пользователь №: 8 750
Специализация: specialist



Репутация: - 27 +


Для использования webbrowser - форма не обязательна.
Подняться вверх 
 
Сообщение #6
darkcoder
Вставить ник
сообщение 11:03:2008, 09:59
Цитата Ответить 


Новенький
*

Группа: Программист
Сообщений: 19
Регистрация: 31:03:2007
Пользователь №: 9 988



Репутация: - 0 +


а как? в какую сторону копать?
Подняться вверх 
 
Сообщение #7
sax_ol
Вставить ник
сообщение 11:03:2008, 10:07
Цитата Ответить 


==============
*****

Группа: Модеры
Сообщений: 1 740
Регистрация: 11:01:2007
Пользователь №: 8 750
Специализация: specialist



Репутация: - 27 +


В справку вестимо. Смотреть что надо, чтобы TWebBrowser работал без формы и т.д. Кстати а зачем вам он в сервисе, чисто пробы?
Да, и тот код, который вы показываете на др. форумах - нерабочий, по нему видно, что он не совсем ваш. wink.gif

PS: Я бы вам посоветовал идти от малого к сложному, и по дороге все прояснится.
Подняться вверх 
 
Сообщение #8
darkcoder
Вставить ник
сообщение 11:03:2008, 10:26
Цитата Ответить 


Новенький
*

Группа: Программист
Сообщений: 19
Регистрация: 31:03:2007
Пользователь №: 9 988



Репутация: - 0 +


Цитата(sax_ol @ 11:03:2008, 12:07 ) *
В справку вестимо. Смотреть что надо, чтобы TWebBrowser работал без формы и т.д. Кстати а зачем вам он в сервисе, чисто пробы?
Да, и тот код, который вы показываете на др. форумах - нерабочий, по нему видно, что он не совсем ваш. wink.gif

PS: Я бы вам посоветовал идти от малого к сложному, и по дороге все прояснится.

код рабочий.
вместо wb я ставил функцию для записи в файл test('строка которую записать')
в каждой функции в коде и после каждого условия я ставил дамп в лог, с описанием что происходит
ставится он нормально и запускается сразу же
после перезагрузки в логе отписываются старты тестовой функции
так что все нормально
код не мой, мне нужно оживить этот и потом уже писать свой нормальный
ну а как идти, я работаю с утра до ночи последние три года, сейчас серваки куплены все настроено осталось дело за малым этот код написать
код мне этот для накрутки
Подняться вверх 
 
Сообщение #9
sax_ol
Вставить ник
сообщение 11:03:2008, 10:54
Цитата Ответить 


==============
*****

Группа: Модеры
Сообщений: 1 740
Регистрация: 11:01:2007
Пользователь №: 8 750
Специализация: specialist



Репутация: - 27 +


Тот что показали - нерабочий. Кстати есть еще компоненты от Indy, тоже можно на них посмотреть.
Подняться вверх 
 
Сообщение #10
darkcoder
Вставить ник
сообщение 11:03:2008, 11:18
Цитата Ответить 


Новенький
*

Группа: Программист
Сообщений: 19
Регистрация: 31:03:2007
Пользователь №: 9 988



Репутация: - 0 +


Цитата(sax_ol @ 11:03:2008, 12:54 ) *
Тот что показали - нерабочий. Кстати есть еще компоненты от Indy, тоже можно на них посмотреть.

ну да, тот не запускается
а с дампом в текстовый файл пашет
сейчас попробую через длл сделать

незнаю насчет indy, я саму идею подсмотрел у одной малвары, отреверсил ее, там примерно так сделано только не через сервис а через автозагрузку. через сервис имхо лучше если еще добавить блокировку файла и ф-цию p2p червя чтоб пробывал сам себя копировать в папки обмена под разными именами так вообще отлично выйдет

Сообщение отредактировал darkcoder - 11:03:2008, 11:18
Подняться вверх 
 
Сообщение #11
sax_ol
Вставить ник
сообщение 11:03:2008, 12:48
Цитата Ответить 


==============
*****

Группа: Модеры
Сообщений: 1 740
Регистрация: 11:01:2007
Пользователь №: 8 750
Специализация: specialist



Репутация: - 27 +


не понял, про какого червя речь?
Подняться вверх 
 
Сообщение #12
European
Вставить ник
сообщение 11:03:2008, 12:56
Цитата Ответить 


Божественный
*****

Группа: Модеры
Сообщений: 1 816
Регистрация: 4:09:2006
Из: Минск
Пользователь №: 6 316
Специализация: C++



Репутация: - 31 +


Цитата(sax_ol @ 11:03:2008 - 15:48) *
не понял, про какого червя речь?

Вот так sax_ol стал вирусописателем... smile.gif
Подняться вверх 
 
Сообщение #13
sax_ol
Вставить ник
сообщение 11:03:2008, 13:03
Цитата Ответить 


==============
*****

Группа: Модеры
Сообщений: 1 740
Регистрация: 11:01:2007
Пользователь №: 8 750
Специализация: specialist



Репутация: - 27 +


тогда прикроем темку, пока не началось smile.gif
Подняться вверх 
 
Сообщение #14


Закрыто  Новая тема 

 

RSS Текстовая версия Сейчас: 17:05:2008 - 04:27
с нами можно связаться по:
телефону: +375-(29)-632-60-67
e-mail:info@codeby.net