Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

в чем ошибка [D7]

lllll00 © (2007-09-09 17:02:00)
assignfile(l,'version.ini');
reset(l);

assignfile(k,'version.new');
rewrite(k);

n := 0;
seek(l,n);
while not eof(l) do
begin
blockread(l,buf,254);
n := n + 254;
seek(l,n);
buf[254] := byte(13);
buf[255] := byte(10);
blockwrite(k,buf,256);
end;

closefile(l);
closefile(k);

в итоге размер файла = 0

grisme (2007-09-10 11:41:00) [1]

> DrPass © (09.09.07 20:52) [7]
> > .... ,1);Жёсткие у тебя смайлики... :)

это ацкие мутацыы %-)

IOs (2007-09-09 23:31:00) [2]
> А чего надо было читать, размер блока по умолчанию 128 байт

давно это было, в смысле, когда с этим сталкивался (размер блока по умолчанию). Очень давно...

Anatoly Podgoretsky (2007-09-09 21:08:00) [3]
А чего надо было читать, размер блока по умолчанию 128 байт.

IOs (2007-09-09 20:56:00) [4]
:-)..

пс.. модчу, а то счас придет дядя Толя и намылит шею...

DrPass (2007-09-09 20:52:00) [5]

> .... ,1);

Жёсткие у тебя смайлики...
:)

IOs (2007-09-09 20:38:00) [6]
> ...но общий ход мыслей - в правильном направлении

я польщен....
> Ну ошибся в четыре раза.
может быть. влом было ставить эксперимент. или читать rtfm (особенно учитывая, то, что в даном случае - для меня чисто спортивный интерес)..
Тем более, что см. DrPass © (09.09.07 20:25) [4]
и тем более, что
.... ,1);

Anatoly Podgoretsky (2007-09-09 20:29:00) [7]
> DrPass (09.09.2007 20:25:04) [4]

Ну ошибся в четыре раза.

DrPass (2007-09-09 20:25:00) [8]

> > Подсказка на три балла - а не 254 * 512 случайно?
>
> Нет

...но общий ход мыслей - в правильном направлении

Плохиш (2007-09-09 20:16:00) [9]

> Подсказка на три балла - а не 254 * 512 случайно?

Нет

IOs (2007-09-09 19:33:00) [10]
вопрос на засыпку:

сколько байт будет в вашем случае пытаться подчитывать оператор

blockread(l,buf,254);

подсказка - не 254.

Подсказка на три балла - а не 254 * 512 случайно?

Доп. вопрос - а что нужно делать?

Подсказка -
а может случайно писать вот так:
...
reset(l, 1);
...
rewrite(k, 1);

зы. ситуейшн, когда файл входной меньше за 254 байта сегодня не рассматриваем..

зы2. Так в чем ошибка собстенно? Имхо, в невнимательном чтении RTFM...

Palladin (2007-09-09 17:06:00) [11]
там же где и у Blast'а...

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »