Турбо Паскаль 6.0

Копирование потоков.


TStream имеет метод CopyFrom(S, Count), который копирует Count байт из потока S. CopyFrom может использоваться для копирования всего содержимого потока в другой поток. Если Вы постоянно обращаетесь к дисковым потокам, Вы можете скопировать их в EMS поток для более быстрого доступа:

NewStream := New(TEmsStream, Init(OldStream^.GetSize)); OldStream^.Seek(0); NewStream^.CopyFrom(OldStream, OldStream^.GetSize);



Содержание раздела