Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|

28.02.2010, 23:43
|
|
Познающий
Регистрация: 15.07.2009
Сообщений: 71
Провел на форуме: 520157
Репутация:
35
|
|
Сообщение от Андрей021
Этим кодом я записываю строковой параметр. что сдесь поправить, что бы записывался двоичный параметр REG_BINARY "Timeout"=hex:0a,00,00,00?
Код:
procedure RegWrite;
var
reg: TRegistry;
Bin: array[0..10] of Byte;
I: Integer;
begin
for i:= 0 to High(Bin) do Bin[i]:= i;
reg:= TRegistry.Create(KEY_ALL_ACCESS);
with Reg do
try
RootKey:= HKEY_CURRENT_USER;
OpenKey('Software\my_sub_key', True);
WriteInteger('Integer', I);
WriteDate('Date', Now);
WriteBinaryData('BinData', Bin, SizeOf(Bin));
WriteString('String', 'String');
WriteBool('Bool',True);
Reg.WriteFloat('Float',2.366);
CloseKey;
finally
Free;
end;
end;
Последний раз редактировалось alexey-m; 01.03.2010 в 01:16..
|
|
|

01.03.2010, 17:21
|
|
Постоянный
Регистрация: 20.01.2010
Сообщений: 338
Провел на форуме: 500264
Репутация:
69
|
|
Сообщение от ErrorNeo
шлю запрос:
Код:
sendbuff := 'GET '+request+' HTTP/1.1'+ #13#10 +
'Host: domain.com'+ #13#10 +
'User-Agent: Mozilla/5.0 (Windows NT 5.1; ru; rv:1.9.0.17)'+ #13#10 +
'Accept: text/html'+ #13#10 +
'Accept-Language: ru,en-us;q=0.7,en;q=0.3'+ #13#10 +
// 'Accept-Encoding: gzip,deflate'+ #13#10 +
'Accept-Charset: windows-1251,utf-8;q=0.7,*;q=0.7'+ #13#10 +
'Keep-Alive: 300'+ #13#10 +
если раскоменчу - не могу прочесть результат  В смысле, не могу перевести его в "читабальный" вид - а мне к результату надо применять ф-ции pos и copy.
Тем не менее использовать компрессию все же хотелось бы, т.к. скорость работы программы упирается в нехватку траффика.
Кто подскажет, как проще реализовать де-шифровку gzip ?
(видел в гугли какие-то замороченно-трехэтажные методы - не верю, что это настолько сложно)
за помощь буду благодарен!
gzip и deflite - это параметры компрессии. Т.е. ты говоришь серверу прислать тебе сжатый текст..
|
|
|

01.03.2010, 20:47
|
|
Участник форума
Регистрация: 20.12.2008
Сообщений: 277
Провел на форуме: 828081
Репутация:
84
|
|
ЕррорНео я бы тебе посоветовал использовать инди где это решается в пару строк кода,
но я уже в другой теме прочитал что ты не любишь её (велосипедо-строительство рулед)
Хотя, мб есть возможность прикрутить всего один класс TIdCompressorZLib, но его метод имеет вид:
procedure DecompressHTTPDeflate(
AInStream: TIdStream,
AOutStream: TIdStream
);
Т.е. в любом случае надо конвертировать в TIdStream
Последний раз редактировалось GhostOnline; 01.03.2010 в 20:55..
|
|
|

01.03.2010, 20:56
|
|
Moderator - Level 7
Регистрация: 02.05.2009
Сообщений: 894
Провел на форуме: 4297091
Репутация:
2261
|
|
Сообщение от RedFern.89
gzip и deflite - это параметры компрессии. Т.е. ты говоришь серверу прислать тебе сжатый текст..
правда? Оо.
Сообщение от GhostOnline
ЕррорНео я бы тебе посоветовал использовать инди где это решается в пару строк кода,
но я уже в другой теме прочитал что ты не любишь её (велосипедо-строительство рулед)
я не люблю инди потому что он глючен + не позволяет развивать больших скоростей. (а многие мои прграммы за счет Вин-Апи обрабатывают по 10+- тысяч запросов\мин)
Но за совет тем не менее благодарю. Может быть в этой конерктной программе, где у меня все упирается в траффик - и правда эффективнее будет заюзать инди.
Хотя, конечно, было бы прикольнее просто каким-то образом декодировать gzip=\
спс.
upd.
да, этот метод с TIdStream я видел - думал может есть что-то проще и не такое непонятное (на первый взгляд)
может заюзаю и это - там видно будет)
Последний раз редактировалось ErrorNeo; 01.03.2010 в 21:00..
|
|
|

01.03.2010, 21:26
|
|
Участник форума
Регистрация: 20.12.2008
Сообщений: 277
Провел на форуме: 828081
Репутация:
84
|
|
Ты как специализирующийся на винсок, можешь сказать сколько % выигрыша в скорости дают сокеты перед инди?
|
|
|

01.03.2010, 22:38
|
|
Постоянный
Регистрация: 20.01.2010
Сообщений: 338
Провел на форуме: 500264
Репутация:
69
|
|
в инди все просто сделанно, и там ты можешь "Декомпресировать" текст, который тебе прислал сервер. В принципе это экономия трафика))
|
|
|

03.03.2010, 10:11
|
|
Постоянный
Регистрация: 27.10.2008
Сообщений: 380
Провел на форуме: 1249808
Репутация:
149
|
|
Ты как специализирующийся на винсок, можешь сказать сколько % выигрыша в скорости дают сокеты перед инди?
это от задачи зависит, допустим тебе несколько сот(тысяч) потоков надо создать и чтото в них передать по сети, если ты сделаешь это в инди то прога боюсь не только медленнее это делать будет но и вообще комп повесит.
|
|
|

03.03.2010, 11:23
|
|
Постоянный
Регистрация: 20.01.2010
Сообщений: 338
Провел на форуме: 500264
Репутация:
69
|
|
везде свои подюсы и минусы)) все зависит от цели)
|
|
|

03.03.2010, 11:24
|
|
Moderator - Level 7
Регистрация: 02.05.2009
Сообщений: 894
Провел на форуме: 4297091
Репутация:
2261
|
|
Сообщение от GhostOnline
Ты как специализирующийся на винсок, можешь сказать сколько % выигрыша в скорости дают сокеты перед инди?
зависит от приложения. Если потоков мало - врятли выиграш будет заметен, а в многопоточных приложениях (1000+ потоков) выигрыш - десятки процентов.
|
|
|

03.03.2010, 12:34
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме: 3288241
Репутация:
3349
|
|
2 ErrorNeo 1000+ потоков 0 выигрыш будет = бесконечности потому что деление на 0 даст ошибку )) т.к. в 1000 потоков инди загнется все со всей прогой и половиной винды )
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|