Скачать: CL | DM;

Вопрос несколько раз обсуждался, но всё равно не получается   Найти похожие ветки 

← →
Новеньки в Делфи   (2002-06-02 15:48) [0]

Так как всё таки сделать что бы файл скопировал сам себя в нужную дирректорию?
Смотрел статьи здесь не эту тему, но там были показаны грамоздкие способы, есть способ легче?
Видел Song предложил CopyFile(); но ни чего не получается, ф-ция возвращает true, но файл не копируется:(

---

← →
MrAngel ©   (2002-06-02 15:55) [1]

Естественно через CreateFile !!! Или ещё можно через _lCreat

Есть ещё способ использовать TFileStream

---

← →
Song ©   (2002-06-02 16:03) [2]

Уважаемый Новеньки в Делфи, вот только что проверил. Работает!

procedure TForm1.FormCreate(Sender: TObject);
begin
CopyFile(PChar(Application.ExeName),PChar("c:\"+ExtractFileName(Application.ExeName)),True);
end;

---

← →
Anatoly Podgoretsky ©   (2002-06-02 16:33) [3]

Новеньки в Делфи (02.06.02 15:48)
Код давай

---

← →
Новеньки в Делфи   (2002-06-02 18:02) [4]

Мастера, прошу прощение :) ... я пытался скопировать в несуществующую дирректорию в надежде что функция сама создаст, оказывается нужно предварительно mkDir()-ом создать.

Благодарю за помощь.

---

← →
Sherbacov ©   (2002-06-02 22:47) [5]

Как скопировать все файлы из одной директории в другую, как создать такой фильтр?

---

← →
Song ©   (2002-06-03 08:30) [6]

Через SHFileOperation или через TSearchRec или запуском командного процессора.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.008 c