Difference between revisions of "CopyFile/ru"

From Lazarus wiki
Jump to navigationJump to search
(Created page with "{{CopyFile}} Модуль: Lazarus fileutil <syntaxhighlight> // флаги для копирования type TCopyFileFlag = ( cffOverwriteFile, cff...")
 
m (Fixed syntax highlighting)
Line 3: Line 3:
 
Модуль: Lazarus [[fileutil/ru|fileutil]]
 
Модуль: Lazarus [[fileutil/ru|fileutil]]
  
<syntaxhighlight>
+
<syntaxhighlight lang=pascal>
 
// флаги для копирования
 
// флаги для копирования
 
type
 
type
Line 21: Line 21:
  
 
Пример:
 
Пример:
<syntaxhighlight>
+
<syntaxhighlight lang=pascal>
 
uses  
 
uses  
 
...
 
...

Revision as of 02:22, 12 February 2020

English (en) suomi (fi) français (fr) русский (ru)

Модуль: Lazarus fileutil

// флаги для копирования
type
 TCopyFileFlag = (
   cffOverwriteFile,
   cffCreateDestDirectory,
   cffPreserveTime
   );
 TCopyFileFlags = set of TCopyFileFlag;

function CopyFile(const SrcFilename, DestFilename: string): boolean;
function CopyFile(const SrcFilename, DestFilename: string; PreserveTime: boolean): boolean;
function CopyFile(const SrcFilename, DestFilename: string; Flags: TCopyFileFlags=[cffOverwriteFile]): boolean;

copyfile копирует файл из места SrcFilename в место DestFilename. При желании можно сохранить метку времени файла (флаг cffPreserveTime).

Пример:

uses 
...
fileutil
...
CopyFile('c:\autoexec.bat','c:\windows\temp\autoexec.bat.backup');

Результат работы функции - вернёт True при успешном копировании и False в противном случае.

Light bulb  Примечание: Если вы хотите использовать данную функцию в консольных программах, вам необходимо добавить модуль LazUtils, который не будет тянуть за собой весь пакет LCL