Вверх ↑
Этот топик читают: Гость
Гость
Ответов: 17029
Рейтинг: 0
#1: 2007-12-23 13:53:10 правка | ЛС | профиль | цитата


Редактировалось 7 раз(а), последний 2021-06-24 06:56:01
карма: 0

0
vip
#1.1контекстная реклама от партнеров
Разработчик
Ответов: 26067
Рейтинг: 2121
#2: 2007-12-23 13:55:48 ЛС | профиль | цитата
Гость писал(а):
Да и вообще для HiAsm'a надо делать побольше сетевых компонентов
Это -- совсем не факт. Кто-то занимается сетями, кто-то занимается базами, кто-то графикой, кто-то музыкой и тд, и тп.
карма: 22

0
Гость
Ответов: 17029
Рейтинг: 0
#3: 2007-12-23 14:00:21 правка | ЛС | профиль | цитата


Редактировалось 7 раз(а), последний 2021-06-24 06:56:01
карма: 0

0
Разработчик
Ответов: 26067
Рейтинг: 2121
#4: 2007-12-23 14:29:27 ЛС | профиль | цитата
Гость писал(а):
Ну и с твоим возражением немогу не согласиться
А я как-то и не возражал, просто констатировал факт.
карма: 22

0
Ответов: 5227
Рейтинг: 587
#5: 2007-12-23 14:36:47 ЛС | профиль | цитата
Яндех -> Поиск -> HTTP Server и туева хуча подобного добра найдётся уверен ;)
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Ответов: 3851
Рейтинг: 159
#6: 2007-12-23 14:42:26 ЛС | профиль | цитата
Гость писал(а):
Apache в одном компоненте
Ну ты приколист..
В UpLoad есть компонент TCP_ServerEx с небольшим примером.
И вот ещё http://dev.hiasm.com/xf/topic.php?p=61872#P61872
карма: 0
начавший
0
Гость
Ответов: 17029
Рейтинг: 0
#7: 2007-12-23 15:47:34 правка | ЛС | профиль | цитата


Редактировалось 7 раз(а), последний 2021-06-24 06:56:01
карма: 0

0
Ответов: 2125
Рейтинг: 159
#8: 2007-12-24 17:02:53 ЛС | профиль | цитата
Был другой пример:
code_8014.txt

Файлы ищутся в подкаталоге www (от текущего).
карма: 1

0
файлы: 1code_8014.txt [4.8KB] [634]
Гость
Ответов: 17029
Рейтинг: 0
#9: 2007-12-24 19:24:26 правка | ЛС | профиль | цитата


Редактировалось 7 раз(а), последний 2021-06-24 06:56:00
карма: 0

0
Администрация
Ответов: 15294
Рейтинг: 1518
#10: 2007-12-25 14:17:04 ЛС | профиль | цитата
Видимо стоит внести данный пример в пакет ввиду его востребованности
карма: 26
0
Ответов: 2125
Рейтинг: 159
#11: 2007-12-25 16:11:22 ЛС | профиль | цитата
Видимо.
------------ Дoбавленo:

Гость писал(а):
всё пашет

А вот у меня если часто обновлять страницу в браузере, выскакивает Runtime error Какой компонент виноват, пока не нашёл, но скорее всего TCP_ServerEx.
------------ Дoбавленo:

А вот фиг. Какая-то проблема с CreateEvent. Я убрал из примера не связанное с ошибкой, при отладке вылетает сразу-же: отправляется ответ, обрывается соединение, а вот потом почему-то возникает событие от нижнего DoData:

Add(MainForm,15929766,119,154)
{
Left=20
Top=105
link(onCreate,4557003:##open,[])
}
Add(TCP_ServerEx,4557003,182,189)
{
}
BEGIN_SDK
Add(EditMultiEx,9971778,3,3)
{
WorkCount=#6:##open|
Width=776
Height=312
}
Add(TCP_Connection,916654,105,126)
{
link(onRead,521415:doEvent,[])
}
Add(HubEx,16179637,735,120)
{
Angle=3
link(onEvent,1788507:doEvent1,[(739,51)(20,51)(20,139)])
}
Add(Memory,2863056,343,126)
{
link(onData,14904303:doFileExists,[(385,132)(385,154)])
}
Add(Replace,12312877,238,126)
{
SubStr="/"
DestStr="\"
link(onReplace,917603:doStrCat,[])
}
Add(Case,6281813,445,127)
{
Value=Integer(1)
link(onNextCase,11657210:doData,[])
link(onTrue,10882250:doData,[(490,140)(490,203)])
}
Add(DoData,11657210,501,127)
{
Data=String(404.htm)
link(onEventData,16179637:doWork2,[])
link(Data,2879409:Text,[])
}
Add(Hub,1788507,46,133)
{
InCount=2
link(onEvent1,916654:doSend,[])
link(onEvent2,916654:doClose,[(90,146)(90,132)])
}
Add(Hub,766827,557,197)
{
link(onEvent1,3672149:doLoad,[(600,203)(600,182)])
link(onEvent2,4794548:doLength,[(600,210)(600,252)])
}
Add(StrCat,917603,291,126)
{
Str1="www"
link(onStrCat,2863056:doValue,[])
}
Add(StrList,2879409,501,64)
{
Strings=#15:HTTP/1.1 404 OK|29:Server: mswebser/1.0.0(Win32)|0:|45:<html><body><h1>Not Found!</h1></body></html>|
}
Add(FormatStr,14028257,676,246)
{
DataCount=3
Mask="%3Content-Length: %1
Content-Type: text/html

%2"
link(onFString,16179637:doWork3,[(739,252)])
link(Str2,13520680:Var3,[(689,219)])
link(Str3,2893471:Text,[])
}
Add(StrList,3672149,627,148)
{
@Hint=#17:загрузка страницы|
}
Add(FileTools,14904303,396,127)
{
link(onEnd,6281813:doCase,[])
}
Add(BlockFind,6091776,182,126)
{
IncludeBlock=1
StartBlock="GET "
EndBlock=" "
link(onSearch,12312877:doReplace,[])
}
Add(DoData,10882250,501,197)
{
link(onEventData,766827:doEvent1,[])
link(Data,2863056:Value,[(507,178)(349,178)])
}
Add(GetDataEx,13520680,620,210)
{
link(Data,3672149:Text,[])
}
Add(StrList,2893471,690,148)
{
Strings=#15:HTTP/1.1 200 OK|29:Server: mswebser/1.0.0(Win32)|
}
Add(Length,4794548,627,246)
{
link(onLength,14028257:doString,[])
link(Str,13520680:Var2,[])
}
Add(Debug,521415,154,126)
{
link(onEvent,6091776:doSearch,[])
}
END_SDK
------------ Дoбавленo:

Вобщем, надо как-то откладывать уничтожение динамического мультика, пока внутри него не отработают события. А то получается, что браузер обрывает соединение, мультик уничтожается, тут-то и наступают кранты, если было CreateEvent и цикл не отработал до конца.
карма: 1

0
Гость
Ответов: 17029
Рейтинг: 0
#12: 2007-12-25 16:40:11 правка | ЛС | профиль | цитата


Редактировалось 7 раз(а), последний 2021-06-24 06:56:00
карма: 0

0
Администрация
Ответов: 15294
Рейтинг: 1518
#13: 2007-12-25 17:00:31 ЛС | профиль | цитата
чтобы узнать, что выдавать в ответ на запрос клиента по любому типу файла достаточно посмотреть на ответы проверенных серверов. Например:

GET /xx/smilies/icon_smile.gif HTTP/1.1
Host: 1gb.hiasm.ru



либо посмотреть эти заголовки в FireFox+FireBug
карма: 26
0
Гость
Ответов: 17029
Рейтинг: 0
#14: 2007-12-25 17:00:56 правка | ЛС | профиль | цитата


Редактировалось 7 раз(а), последний 2021-06-24 06:56:00
карма: 0

0
Ответов: 2125
Рейтинг: 159
#15: 2007-12-25 17:07:40 ЛС | профиль | цитата
Гость писал(а):
зачем надо разрывать соединение

Браузер сам разрывает соединение, если больше нечего грузить. Даже если в ответе стоит Keep-Alive.
карма: 1

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)