Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
1-1219124183
checkmate-maker
2008-08-19 09:36
2009.10.11
Редактор с картинками


15-1249638768
desc
2009-08-07 13:52
2009.10.11
Домены net, ru, info...


15-1250074642
student_delphi
2009-08-12 14:57
2009.10.11
Стандарт SQL для СУБД Access 2003


15-1250061319
JS
2009-08-12 11:15
2009.10.11
Шрифт


15-1250109003
Юрий
2009-08-13 00:30
2009.10.11
С днем рождения ! 13 августа 2009 четверг




   Наверх