Скачать: CL | DM;

Как работать с файлами в KOL ....   Найти похожие ветки 

← →
Mushu   (2003-10-10 18:47) [0]

читать, писать и тд
Filecreate
Fileseek
fileread
filewrite
fileclose
но не могу(уже по всякому извращался) я прочитать из файла ... хелп скудный может кто пример приведет рабочий ? дальше сам разберусь...

---

← →
miek ©   (2003-10-10 21:31) [1]

Нафиг такие сложности? Чем не устраивает Read/Blockread?

---

← →
Sagrer   (2003-10-10 22:10) [2]

Если файл не оч большой, то Blockread - ом загоняю в строку, и уже с ней работаю (а потом ее сэйвю) - сделал для этого специальный класс, достаточно удобно.

---

← →
BelchonokH ©   (2003-10-10 22:16) [3]

Вот рабочий пример на запись, хотя по моему, это практически везде есть...

var F:textfile;
...
AssignFile(f,GetStartDir+"Message.txt" );
 if fileExists(GetStartDir+"Message.txt") then
 Append(f)
 else
 ReWrite(f);
 Writeln(f, s);
 Writeln(f, s1);
closefile(f);


---

← →
Mushu   (2003-10-10 22:38) [4]

пасиба на добром слове ...
но меня интересует работоспосбность функций

Filecreate
Fileseek
fileread
filewrite
fileclose

зачем их тогда делать если они работают через пень колода

---

← →
Mushu   (2003-10-11 17:09) [5]

к тому же c с применением blockread и тд. размер программы подскочил с 30 до 60 кб и зачем мне это ??

---

← →
Gandalf ©   (2003-10-11 20:03) [6]

Текс:
var
f:Pstrlist;
begin
 f:=NewStrList;
 f.LoadFromFile("donkey.txt");
 f.Add("New Line - KOL Rules");
 f.SaveToFile("concretdonkey.txt");
 f.free;
end;

бинарник:

var
f:PStream;
begin
 f:=NewFileStream("demo.bin",0); // надо ставить не 0 - а свое
 ...
 f.seek
 f.read
 f.write
 ...
 f.free;
end;

Ини:

PIniFile и т.д.

Примеры есть в статьях на этом сайте.

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c