Форум: "Основная";
Текущий архив: 2002.11.28;
Скачать: [xml.tar.bz2];
ВнизКак скопировать файл??? Найти похожие ветки
← →
Adam (2002-11-16 19:14) [0]Как скопировать файл????
← →
GoodMan (2002-11-16 19:18) [1]Функция copy...
странно что она так называется, правда???
← →
Николай Быков (2002-11-16 19:21) [2]например процедурой CopyFile(текущее_имя_файла, новое_имя_файла,переменная_boolean);
← →
Comp (2002-11-16 19:22) [3]Например,
CopyFile(f);
← →
Николай Быков (2002-11-16 19:22) [4]
> GoodMan (16.11.02 19:18)
Да ну? Где это ты такую функцию нашел?
← →
Comp (2002-11-16 19:23) [5]В общем посмотришь сам..
← →
Comp (2002-11-16 19:24) [6]Николай Быков .
Я в общем...
А там Делфи сама скажет..
← →
Николай Быков (2002-11-16 19:24) [7]
> Comp © (16.11.02 19:22)
И ты где нашел CopyFile с одним единственным параметром? Куда этот файл (как я понял переменная f это файл) скопируется?
← →
Comp (2002-11-16 19:26) [8]Николай Быков ,
Дэлфи при написании функции выведет подсказку, какие параметры нужны...
← →
Adam (2002-11-16 19:27) [9]Я знаю эту функцию... но че делает "переменная_boolean" ???
← →
Николай Быков (2002-11-16 19:29) [10]
> Comp © (16.11.02 19:26)
Да блин. ты смотри на время создания постинга. Иы их с тобой почти одновременно написали. я не видел че ты там пишешь
+сам знаю про подсказку дельфей
+а вот этот самый Адам напишет именно так, как ты ему сказал, потому что
1)там меньше писать
2)не надо разбираться с тем какие там параметры
а потом он придет сюда и напишет, что, мол, у него не получается и мы ему тут неправду говорим все.
← →
Николай Быков (2002-11-16 19:30) [11]
> Adam (16.11.02 19:27)
Значение этой переменной становится TRUE если файл скопировался и FALSE если файл по какой-то причине не скопировался. понятно?
← →
Comp (2002-11-16 19:31) [12]Ну и что..
Лучше запомнит
А там вообще всё ясно и сразу...
← →
TTCustomDelphiMaster (2002-11-16 19:55) [13]Николай Быков
Вы сами то help читаете прежде чем отвечать?
← →
Николай Быков (2002-11-16 20:01) [14]
> TTCustomDelphiMaster © (16.11.02 19:55)
Естественно читал:
Specifies how this operation is to proceed if a file of the same name as that specified by lpNewFileName already exists. If this parameter is TRUE and the new file already exists, the function fails. If this parameter is FALSE and the new file already exists, the function overwrites the existing file and succeeds.
← →
Anatoly Podgoretsky (2002-11-16 20:16) [15]gПолное противоречие твоему утверждению в 16.11.02 19:30
← →
Николай Быков (2002-11-16 20:21) [16]Ну хорошо. Признаюсь. Я прочитал только три слова TRUE FALSE и sucseed. Поэтому я решил 16.11.02 19:30
← →
pavel_ak (2002-11-16 20:38) [17]А такое не попрет?
Procedure FileCopy(Const SourceFileName, TargetFileName: String);
Var
S,T : TFileStream;
Begin
S := TFileStream.Create(sourcefilename, fmOpenRead );
try
T := TFileStream.Create(targetfilename, fmOpenWrite or fmCreate);
try
T.CopyFrom(S, S.Size ) ;
FileSetDate(T.Handle, FileGetDate(S.Handle));
finally
T.Free;
end;
finally
S.Free;
end;
end;
← →
Николай Быков (2002-11-16 20:59) [18]
> pavel_ak © (16.11.02 20:38)
Ты написал 17 строчек, а для выхова той процедуры нужно только одну написать. Твой способ в 17 раз хуже
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.11.28;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.006 c