HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   ANTICHAT > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
Перезагрузить страницу [Delphi]/[Pascal] Задай вопрос, получи ответ
   
 
 
Опции темы Поиск в этой теме Опции просмотра
Предыдущая Предыдущее сообщение   Следующее сообщение Следующая

  #11  
Старый 27.03.2009, 16:17
KaZ@NoVa
Постоянный
Регистрация: 05.07.2008
Сообщений: 555
С нами: 9394886

Репутация: 1467


По умолчанию
Цитата:
Сообщение от Nightmarе  
Так всё-же может кто подкинуть код как скопировать файл если он занят другим процэссом???
Вот например:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
infs,outfs: tfilestream;
begin
infs := tfilestream.create( edit1.text, fmopenread );
outfs := tfilestream.create( edit2.text, fmcreate );
infs.free;
outfs.free;
end;
При занятости файла уведомляет ошибочкой, может fmopenread можно на что то заменить? ЧТобы было только чтение, а не открытие файла.
Стоит попробовать заменить TFileStream на TMemoryStream и загружать методом loadFromFile вроде! Да кроме того кажется там есть флаг при открытии - fmRead!
 
Ответить с цитированием
 



Предыдущая тема Следующая тема
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Wi-Fi, BT] Задай вопрос - получи ответ! Alexsize Беспроводные технологии/Wi-Fi/Wardriving 2570 09.06.2026 16:21
[jQuery] - Задай вопрос, получи ответ Isis PHP 62 25.12.2009 03:25



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.