Показать сообщение отдельно
  #4  
Старый 18.07.2011, 18:57
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
 
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию

1.
Код:
Stream1.Seek(0,0); Stream2.Seek(0,2);
Stream2.CopyFrom(Stream1,Stream1.Size);
2. Seek можно использовать для перемещения не только относительно начала (Position), но и текущего положения, и конца файла.
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Ответить с цитированием