целевая ОС: Windows

Процедура Способ1(ИмяФайла,ИмяВыходногоФайла)
	РазмерБуфера = 1048576;
	Буфер = "";
	Остаток = "";
	memoryStream = Новый COMОбъект("SAPI.spMemoryStream");
	fileStream = Новый COMОбъект("SAPI.spFileStream");
	fileStream.Open(ИмяФайла);
	outStream = Новый COMОбъект("SAPI.spFileStream");
	outStream.Format.Type = 1;
	outStream.Open(ИмяВыходногоФайла, 3);
	Пока Истина Цикл 
		ОбработкаПрерыванияПользователя();
		Байтов = fileStream.Read(Буфер, РазмерБуфера);
		Сообщить(ТипЗнч(Буфер));
		Если Байтов < РазмерБуфера Тогда 
			Если Байтов > 0 Тогда 
				memoryStream.SetData(Буфер);
				memoryStream.Read(Остаток, Байтов);

				outStream.Write(Остаток);
			КонецЕсли;
			Прервать;
		Иначе
			outStream.Write(Буфер);
		КонецЕсли;
	КонецЦикла;
	fileStream.Close();
	outStream.Close();
КонецПроцедуры

Процедура Способ2(ИмяФайла,ИмяВыходногоФайла)
	BufferSize=1048576;
	InArray=Новый ComSafeArray("VT_UI1",BufferSize);
	Сообщить("Тип элементов: "+InArray.GetType());
	InStream=Новый COMОбъект("SAPI.spFileStream");
	InStream.Open(ИмяФайла);
	OutStream=Новый COMОбъект("SAPI.spFileStream");
	OutStream.Format.Type=1; // SAFTText
	OutStream.Open(ИмяВыходногоФайла,3);
	// Open(FileName,FileMode)
	// FileMode values:
	// SSFMOpenForRead = 0 - Opens an existing file as read-only
	// SSFMOpenReadWrite = 1 - Opens an existing file as read-write
	// SSFMCreate = 2 - Opens an existing file as read-write. Else, it creates the file then opens it as read-write
	// SSFMCreateForWrite = 3 - Creates file even if file exists and so destroys or overwrites the existing file
	
	// Seek(Position,Origin)
	// Origin values:
	// SSSPTRelativeToStart = 0 - Calculates the stream offset relative from the start of the stream
    // SSSPTRelativeToCurrentPosition = 1 - Calculates the stream offset relative from the current position
    // SSSPTRelativeToEnd = 2 - Calculates the stream offset relative from the end of the stream
	
	Пока Истина Цикл
		ОбработкаПрерыванияПользователя();
		DataSize=InStream.Read(InArray,BufferSize);
		Сообщить("DataSize =  "+DataSize);
		Если DataSize=BufferSize Тогда
			OutStream.Write(InArray);
		Иначе
			Если DataSize>0 Тогда
				InArray.Resize(DataSize);
				OutStream.Write(InArray);
			КонецЕсли;
			Прервать;
		КонецЕсли;
	КонецЦикла;
	InStream.Close();
	OutStream.Close();
КонецПроцедуры