 |
|
17.10.2009, 13:20
|
|
Познающий
Регистрация: 02.06.2009
Сообщений: 67
С нами:
8916612
Репутация:
54
|
|
mobilka, нужно написать так:
s := SendFile('site.ru', '/get.php', path);
|
|
|
17.10.2009, 13:36
|
|
Познавший АНТИЧАТ
Регистрация: 05.03.2007
Сообщений: 1,985
С нами:
10097606
Репутация:
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
С нами:
9099476
Репутация:
14
|
|
Как сделать неубиваемый в диспетчере задач процесс?
|
|
|
|
17.10.2009, 15:19
|
|
Познающий
Регистрация: 02.06.2009
Сообщений: 67
С нами:
8916612
Репутация:
54
|
|
Если только в диспетчере задач - то юзай системные имена файлов 
А вообще лучше делать не неубиваемый, а невидимый процесс.
Последний раз редактировалось Nullsleep; 17.10.2009 в 15:29..
|
|
|
|
17.10.2009, 15:34
|
|
Участник форума
Регистрация: 21.03.2009
Сообщений: 207
С нами:
9021828
Репутация:
119
|
|
Язык: Pascal
есть текстовый файл. в нем столбиком написаны цифры. цифр не больше 80.
как загнать все эти цифры в массив?
Пример:
Берем из текстового документа:
assign(input,'input.txt');
reset(input);
while not eof do begin
вот так из текстового файла вытаскиваю...Но как полученные данные в массив загнать??? |
|
|
|
17.10.2009, 15:42
|
|
Постоянный
Регистрация: 13.12.2008
Сообщений: 354
С нами:
9162683
Репутация:
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
С нами:
8916612
Репутация:
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
С нами:
9651087
Репутация:
124
|
|
А делфи и паскаль не особо отличаються?? И с чего лучше начать? (если считать что не легче учиться, а более выгодно писать проги) И какие книгы вы бы посоветовали.
Лучше в пм.
Заранее спс!
|
|
|
|
17.10.2009, 23:26
|
|
Постоянный
Регистрация: 09.06.2005
Сообщений: 531
С нами:
11010660
Репутация:
439
|
|
особо отличаются. сходство у них в синтаксисе. начинай сразу с делфи. по книгам юзай поиск здесь и в гугле. обсуждалось 1000000 раз.
|
|
|
|
18.10.2009, 00:48
|
|
Постоянный
Регистрация: 12.05.2009
Сообщений: 395
С нами:
8947056
Репутация:
229
|
|
К примеру есть файл с большим кол. строк
Нужно подсчитать кол. строк потоками (threards), как это сделать?
С потоками как то туго у меня
|
|
|
|
|
|
|
|
Здесь присутствуют: 4 (пользователей: 0 , гостей: 4)
|
|
|
|
Похожие темы
Линейный вид
