Срочно!

← →
UDS (2003-02-02 21:53) [0]

Как создать (текстовый) файл программно, в той же дир. где и программа?

← →
UDS (2003-02-02 22:04) [1]

??????????????

← →
UDS (2003-02-02 22:13) [2]

Никто не знает чтоли?

← →
Anatoly Podgoretsky (2003-02-02 22:16) [3]

Ты так ничего и не почитал, а зря.

← →
UDS (2003-02-02 22:22) [4]

Вот лежит передо мной талмуд на полкилогамма и в нем ну ни грамма про ввод-вывод(создание!) файлов. А где взять если на дворе 3-й час ночи? Стал бы я рискуя последними часами онлайна торчать тут...

← →
Pasechnik (2003-02-02 22:22) [5]

Действительно , мы не знаем :)

← →
Pasechnik (2003-02-02 22:26) [6]

var
f:textfile;
begin
assignfile(f,"log.txt");
if fileexists("log.txt") then //если уже создан
append(f) //дописываем в конец
else
rewrite(f); //создаём новый
closefile(f);
end;

← →
OxOTHuK (2003-02-02 22:29) [7]

Знают...

const
mytxtfile = "!.txt"

var f_: text;
s: string;
i,ls:integer;

begin
s:= application.ExeName; // или s:=paramstr(0)
for i:=0 to length(s) do
if s[i]="\" then ls:=i;
s:=copy(paramstr(0),0,ls);
assignfile(f_,s+mytxtfile);
rewrite(f_);
.........
close(f_)
end;

по моему это все... не проверял т.к. кодил на скорую руку

← →
UDS (2003-02-02 22:33) [8]

*** rewrite(f); //создаём новый

Разве это создание нового файла? Могет это переписывание старого уже заранее созданного?
А мне то надо чтобы из программы (скажем из TEdit) создавался каталог (имя, например "Тексты1"), а из другого едита само название файла(например test1.txt).

← →
Pasechnik (2003-02-02 22:39) [9]

В Object Pascal разрешается обращаться к типизированным файлам, открытым процедурой Reset (т. е. для чтения информации), с помощью процедуры write (т. е. для записи информации). Такая возможность позволяет легко обновлять ранее созданные типизированные файлы и при необходимости расширять их. Для текстовых файлов, открытых процедурой Reset, нельзя использовать процедуру Write ИЛИ WriteLn.

Стандартная процедура

Rewrite (<ф.п.>);

инициирует запись информации в файл, связанный с файловой переменной <ф.п.>. Процедурой Rewrite нельзя инициировать запись информации в ранее существовавший дисковый файл: при выполнении этой процедуры старый файл (если он был) уничтожается и никаких сообщений об этом в программу не передается.

Срочно! Найти похожие ветки