Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.10;
Скачать: CL | DM;

Вниз

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

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



Страницы: 1 вся ветка

Текущий архив: 2003.02.10;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.027 c
3-28610
FrozenHeart
2003-01-23 00:43
2003.02.10
Поля в БД


1-28836
Max79
2003-02-02 20:40
2003.02.10
Горизонтальная прокрутка в RichEdit


1-28842
snoup
2003-02-02 19:38
2003.02.10
Как отключиться от интернета??? Программно, конечно!


14-29013
Tsr
2003-01-20 22:17
2003.02.10
Paragon NTFS for windows


1-28799
msoftware
2003-01-31 12:51
2003.02.10
Вопрос по TreeView