PStream

← →
Immortal_Death © (2003-09-11 21:31) [0]

Не подскажите почему у меня не получаеться скопировать файл с помощью PStream.
Пишу так:

var
FBig, FResult: PStream;
begin
FBig := NewReadFileStream("1.txt");
FResult := NewWriteFileStream("2.txt");
FBig.Seek(0,spCurrent);
FResult.Seek(0,spCurrent);
FResult.Write(FBig, FBig.Size);
FBig.Free;
FResult.Free;
end;

Файл "1.txt" существует, запускаю прогу, создаеться файл "2.txt", но остаетьтся пустой :(

← →
Dimaxx © (2003-09-12 00:22) [1]

Существует такая функция Stream2Stream - вот она-то тебе и нужна...

Угу, благадарю, разобрался.

PStream Найти похожие ветки