Текущий архив: 2009.10.11;
Скачать: CL | DM;
Вниз
AV Найти похожие ветки
← →
Dennis I. Komarov © (2009-08-06 11:51) [0]Чего-то не проснулся что ли:
GetMem(Buf, S2-S1);
try
FileSeek(F1, S1, 0);
FileRead(F1, Buf, S2-S1);
FileSeek(F2, 0, 2);
FileWrite(F2, Buf, S2-S1);
finally
FreeMem(Buf);
end;
F1 - открыт на чтение, F2 на запись.
S - размеры соотв. файлов.
Процедуры с файлами отрабатывают нормально, на FreeMem ловим AV...
Why?
← →
Palladin © (2009-08-06 11:55) [1]
FileRead(F1, Buf^, S2-S1);
и врайте тоже с ним...
← →
Dennis I. Komarov © (2009-08-06 12:00) [2]о да, пошел "спать"...
Страницы: 1 вся ветка
Текущий архив: 2009.10.11;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.009 c
