[gussenok]

Здравствуйте всем!!! У меня возникли некоторые вопросики по файлам...,я только начала изучать эту тему и прошу мне помочь...

1)как создать f1.txt на диске С:\Мои документы\?
2)Как переименовать этот файл(например, переименовать f1.txt на f2.txt)?
3)как установить атрибут "скрытый" на этот файл?
и последнее 4)как этот фаил удалить?

[moo2k]

1)

Код:

var
f: TextFile;
fName: String[80];
i: integer;
begin
fName := C:\My Documents\f1.txt';
AssignFile(f, fName);
{$I-}
Rewrite(f);
for i:=0 to Form1.Memo1.Lines.Count do
writeln(f, Form1.Memo1.Lines[i]);
CloseFile(f);

2)

Код:

RenameFile('f1.txt', 'f2.txt');

3)

Код:

SetFileAttributes('C:\My Documents\f1.txt', 38);

4)

Код:

DeleteFile('C:\My Documents\f1.txt');

[gussenok]

Спасибо огромное ,сейчас воспользуюсь...