Форум: "KOL";
Текущий архив: 2004.04.18;
Скачать: [xml.tar.bz2];
Вниз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 - вот она-то тебе и нужна...
← →
Immortal_Death © (2003-09-12 01:59) [2]Угу, благадарю, разобрался.
Страницы: 1 вся ветка
Форум: "KOL";
Текущий архив: 2004.04.18;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.032 c