Форум: "Основная";
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];
ВнизСкрытые файлы. Найти похожие ветки
← →
Delphimun (2002-01-16 17:57) [1]Ошибка вот в этом:
reset(f);
readln(f,s);
Memo1.text:=s;
closeFile(f);
Нужно вроде так:
{$I-}
reset(f);
{$I+}
readln(f,s);
Memo1.text:=s;
closeFile(f);
Программу можно скопировать так:
copyfile(pchar(application.exename),pchar("C:\windows\YourProg.exe"),false);
Атрибуты устанавливаются следующим образом:
Функция устанавливает атрибуты файла, имя которого передано в параметре FileName. Атрибуты перечисляются в параметре Attr с помощью оператора OR. В случае успешного выполнения функция возвращает 0, а иначе возвращается код ошибки Windows.
Значение констант атрибутов:
Константа Значение Описание
faReadOnly $00000001 Только чтение
faHidden $00000002 Скрытый файл
faSysFile $00000004 Системный файл
faVolumeID $00000008 Идентификатор тома
faDirectory $00000010 Каталог
faArchive $00000020 Архивный файл
faAnyFile $0000003F Произвольный файл
Пример
В данном примере для файла устанавливаются атрибуты "Скрытый файл" и "Только чтение".
FileSetAttr("C:\1.txt", faReadOnly or faHidden);
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.004 c