Частичное копирование файлов

[Gerzs]

Добрый день.
Можно с помощью WinAPI частично скопировать файл: первые N байт?

[Stilet]

Да. конечно же
открыть файл-прочитать первые N байт - выписать их в другой файл.
OpenFile - ReadFile - CreateFile - WriteFile

[Gerzs]

А помощью TFileStream как? (если можно дайте готовый код)

[raxp]

готовый код поищите на форуме

[Serge_Bliznykov]

var
  FS, FRez : TFileStream;
begin
  FS := TFileStream.Create('ТутИмяФайлаКоторыйЧитаем', fmOpenRead   );
  FRez := TFileStream.Create('ТутИмяФайлаКоторыйПишем', fmCreate);
  FS.Seek(0, soFromBeginning); {не обязательно, файл после открытия и так на начале, но можно так, для порядку сделать}
  FRez.CopyFrom(FS, N_байт );
  FreeAndNil(FS);
  FreeAndNil(FRez);

[Gerzs]

А без открытия файла как?

[Пепел Феникса]

никак. но можно отключить блокирование файла.

[Serge_Bliznykov]

А без открытия файла как?

Это что, шутка такая?
никак!

[Gerzs]

Сообщение от Serge_Bliznykov

Это что, шутка такая?
никак!

Почему же? http://wasm.ru/article.php?article=lockfileswork
3 метод, только это все описано на C++, если бы перевести на Delphi…

[Serge_Bliznykov]

3 метод, только это все описано на C++, если бы перевести на Delphi…

Господи, какой кошмар... через открытие тома на чтение... жуть... я — пасс...
Ну, и что же это за такой занятой файл, если не секрет?... а через банальное fmShareDenyNone не получается его открыть?