Текущий архив: 2002.05.02;
Скачать: CL | DM;
Вниз
Как скопировать файл?? Найти похожие ветки
← →
dfdfd (2002-04-20 19:53) [0]Желательно готовый пример, типа файл "ABC.exe" из папки 1 в папку 2.
← →
Anatoly Podgoretsky © (2002-04-20 20:03) [1]Тебе перевести на английский слова скопировать и файл?
← →
dfdfd (2002-04-20 20:12) [2]Не смешно... :(
Мне нужно так, чтобы не появлялось стандартное виндовское окошко копирования!
← →
Anatoly Podgoretsky © (2002-04-20 20:29) [3]А почему меняем техзадание на ходу и при этом обижаемся?
А ты какие нибудь усилия приложил со своей стороны, скажем посмотреть хотя бы FAQ
← →
dfdfd (2002-04-20 20:40) [4]Никакое задание я не менял! Просто уточнил задание! ФАК я читал, но не очень (вернее совсем) не понял как копировать файлы, поэтому и просил пример.
Если вы знаете, так не легче ли написать сразу ответ на мой вопрос???
← →
PaRL © (2002-04-20 20:46) [5]Болезнь профессионалов :)
Иногда просто бесит. Такое проходит... иногда :)
← →
ION T © (2002-04-20 20:52) [6]
procedure CopyFile(InFile, OutFile: string);
var InStream, OutStream: TFileStream;
begin
InStream:= TFileStream.Create(InFile, fmOpenRead);
try
OutStream:= TFileStream.Create(OutFile, fmCreate);
try
OutStream.CopyFrom(InStream, InStream.Size);
finally OutStream.Free end;
finally InStream.Free end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
CopyFile("c:\tst.txt", "c:\tst2.txt");
end;
← →
Anatoly Podgoretsky © (2002-04-20 20:54) [7]dfdfd (20.04.02 20:12)
Так никакое окошко не появляется, это для фукции строго по переводу.
← →
Anatoly Podgoretsky © (2002-04-20 20:57) [8]PaRL © (20.04.02 20:46)
А не бесит, когда человек хочет на тарелочке и ни хочет даже минимальные усилия приложить?
← →
ION T © (2002-04-20 21:01) [9]
> Anatoly Podgoretsky © (20.04.02 20:57)
Бесит. А ещё больше когда ты и есть тот, кто ищет;)
А я запостил потому, что тока шо как раз это сам и написал.........
Страницы: 1 вся ветка
Текущий архив: 2002.05.02;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.011 c
