OberonCore https://forum.oberoncore.ru/ |
|
Free Pascal буферизованное чтение и запись https://forum.oberoncore.ru/viewtopic.php?f=27&t=4217 |
Страница 1 из 1 |
Автор: | Роман М. [ Среда, 16 Январь, 2013 01:16 ] |
Заголовок сообщения: | Free Pascal буферизованное чтение и запись |
На Free Pascal буферизованное чтение и запись делаются просто: Код: Repeat BlockRead (Fin, buf, Sizeof(buf), NumRead); If NumRead > 0 Then ProcessBlock(buf, NumRead); BlockWrite (Fout, Buf, NumRead, NumWritten); Until (NumRead = 0) or (NumWritten <> NumRead); С размером буфера 64K (другие не пробовал) получилось в среднем 4800 мс. Как это реализовано в FPC через WinAPI я не знаю. (модератор) перенесено из viewtopic.php?p=77180#p77180 согласно пп. 3.3/2.1 |
Страница 1 из 1 | Часовой пояс: UTC + 3 часа |
Powered by phpBB® Forum Software © phpBB Group https://www.phpbb.com/ |