Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];




Вниз

Help!!! 


MystiX   (2002-02-05 19:28) [0]

Подскажите: как работать с файлами?



Обработчик файлов   (2002-02-05 19:33) [1]

Нежно



vector   (2002-02-05 19:36) [2]

А что конкретно нужно?
Можно оч. просто:

var
f:text;
s1,s2:string;
begin
assignfile(f,"путь к файлу\ его имя");
ReSet(f);// Оnкрыть для чтения
WriteLn(f,s1);
WriteLn(f,s2)
CloseFile(f);
end

А что надо?



MystiX   (2002-02-05 20:10) [3]

Нужно записать информацию в файл с произвильным расширением, а потом прочитать.



Фэ   (2002-02-05 20:15) [4]

Какую информацию ?
Расширение ничего не определяет, по крайней мере физически.
Доступ к файлам зависит от их предполагаемого типа: бинарные, типизированные, текстовые..
Чего пишем-то ?



MystiX   (2002-02-05 20:17) [5]

Пишем текст.



Обработчик файлов   (2002-02-05 20:19) [6]

Ну дык ить открой файл на запись и запиши, потом открой файл на чтение и читай. В чем проблема то ? Объяснил бы народу поконкретнее. Мы же Твоих мыслей не читаем
При записи используешь приведенный выше код, но с другими процедурами:
Rewrite - открыть для перезаписи
Append - открыть для добавления



Фэ   (2002-02-05 20:20) [7]

См.
vector> (05.02.02 19:36)



yaJohn   (2002-02-05 20:20) [8]

Help, kluchevie slova File, Read, Write, BlockRead, BlockWrite, AssignFile, CloseFile i t.d.



Фэ   (2002-02-05 20:30) [9]

Попозже доберись до TFileStream - советую.

var
fsR,fsW: TFileStream; // два файловых потока
s: string;
cnt: longint;
..
try
fsR := TFileStream.Create(FileReadName,fmOpenRead);
fsW := TFileStream.Create(FileNewName,fmCreate);
cnt := fsR.Size; // размер читаемого файла
SetLength(S,cnt); // выделение буфера под тело файла
cnt := fsR.Read(S[1],cnt); // сколько реально прочитано
S:= ... ; //меняем текст
try
fsW.Write(PChar(S)^,Length(s)); // пишем в файл
except
// обработка ошибок
end;
finally
if fsR <> nil then FreeAndNil(fsR); // освобождаем и нулим TObject
if fsW <> nil then FreeAndNil(fsW);
end;




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.73 MB
Время: 0.017 c
1-66624           maxi                  2002-02-06 17:09  2002.02.21  
Как минимизировать объем exe файла в Делфи С++Билдер ?


4-66701           KarlovAF              2001-12-20 16:34  2002.02.21  
Как убрать горизонтальный скролбар с TDBGrid-а?


1-66555           Ura                   2002-02-05 11:49  2002.02.21  
Убить поток


1-66582           Di_wind               2002-02-05 20:23  2002.02.21  
Zip


1-66547           EsKor                 2002-02-05 10:48  2002.02.21  
Передача объектов в процедуру/функцию