ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|

17.10.2009, 13:20
|
|
Познающий
Регистрация: 02.06.2009
Сообщений: 67
Провел на форуме: 237284
Репутация:
54
|
|
mobilka, нужно написать так:
s := SendFile('site.ru', '/get.php', path);
|
|
|

17.10.2009, 13:36
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме: 3288241
Репутация:
3349
|
|
2 wolmer
Hellsp@wn правильно сказал - в HTTP заголовке должно быть поле
'Connection: Close'+#13#10+#13#10; Оно должно быть вместо Keep-alive (если оно есть)
Close говорит серваку что после передачи данных он должен закрыть соединение сам.
Но некоторые серваки этого не понимают и ждут пока клиент сам закроет соединение.
ЧТобы избежать этого парси HTTP заголовок ответа сервера и там будет поле Content-Lenght и там указано число байт которые вернул сервак. ВОт ты и считывай это кол-во. как тока считал, то сам закрывай соединение.
|
|
|

17.10.2009, 14:04
|
|
Banned
Регистрация: 26.01.2009
Сообщений: 16
Провел на форуме: 1639681
Репутация:
14
|
|
Как сделать неубиваемый в диспетчере задач процесс?
|
|
|

17.10.2009, 15:19
|
|
Познающий
Регистрация: 02.06.2009
Сообщений: 67
Провел на форуме: 237284
Репутация:
54
|
|
Если только в диспетчере задач - то юзай системные имена файлов
А вообще лучше делать не неубиваемый, а невидимый процесс.
Последний раз редактировалось Nullsleep; 17.10.2009 в 15:29..
|
|
|

17.10.2009, 15:34
|
|
Участник форума
Регистрация: 21.03.2009
Сообщений: 207
Провел на форуме: 554850
Репутация:
119
|
|
Язык: Pascal
есть текстовый файл. в нем столбиком написаны цифры. цифр не больше 80.
как загнать все эти цифры в массив?
Пример:
Берем из текстового документа:
assign(input,'input.txt');
reset(input);
while not eof do begin
вот так из текстового файла вытаскиваю...Но как полученные данные в массив загнать???
|
|
|

17.10.2009, 15:42
|
|
Постоянный
Регистрация: 13.12.2008
Сообщений: 354
Провел на форуме: 1747641
Репутация:
175
|
|
Nizhegorodets, приблизительно так:
Код:
var
arr: array[1..80] of integer;
i: integer;
...
assign(input, 'input.txt');
reset(input);
i := 1;
while not eof(input) do
begin
readln(arr[i]);
i := i + 1;
end;
closefile(input);
В Паскале давно уже не писал, может быть немного ошибся.
Последний раз редактировалось Chrome~; 17.10.2009 в 15:47..
|
|
|

17.10.2009, 15:49
|
|
Познающий
Регистрация: 02.06.2009
Сообщений: 67
Провел на форуме: 237284
Репутация:
54
|
|
Код:
var
input: Text;
a: array[1..80] of Integer;
n, i: Integer;
begin
Assign(input, 'input.txt');
Reset(input);
i := 0;
while not Eof(input) do
begin
i := i+1;
Read(input, a[i]);
end;
Close(input);
end.
|
|
|

17.10.2009, 23:19
|
|
Познающий
Регистрация: 09.01.2008
Сообщений: 40
Провел на форуме: 665104
Репутация:
124
|
|
А делфи и паскаль не особо отличаються?? И с чего лучше начать? (если считать что не легче учиться, а более выгодно писать проги) И какие книгы вы бы посоветовали.
Лучше в пм.
Заранее спс!
|
|
|

17.10.2009, 23:26
|
|
Постоянный
Регистрация: 09.06.2005
Сообщений: 531
Провел на форуме: 3516666
Репутация:
439
|
|
особо отличаются. сходство у них в синтаксисе. начинай сразу с делфи. по книгам юзай поиск здесь и в гугле. обсуждалось 1000000 раз.
|
|
|

18.10.2009, 00:48
|
|
Постоянный
Регистрация: 12.05.2009
Сообщений: 395
Провел на форуме: 4761503
Репутация:
229
|
|
К примеру есть файл с большим кол. строк
Нужно подсчитать кол. строк потоками (threards), как это сделать?
С потоками как то туго у меня
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|