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

Вниз

Как правельно напмсать процедуру по сохранению файлов   Найти похожие ветки 

← →
Антон   (2005-01-20 09:07) [0]

Как правельно напмсать процедуру по сохранению файлов?

---

← →
1008 ©   (2005-01-20 09:14) [1]

Каких файлов?
Больше подробностей или пошлю на smartquestion

---

← →
КаПиБаРа ©   (2005-01-20 09:22) [2]

Даже не знаю что и ответить :)

---

← →
cyborg ©   (2005-01-20 09:24) [3]

Вот так:

Procedure SaveFile(FileName : String);
begin
end;


---

← →
07BB:080Dh   (2005-01-20 09:36) [4]

Антон   (20.01.05 09:07)  

вопрос чуть по конкретнее задай. Опиши что за файл.
var
 F: TextFile;
 S: string;
begin
 s := "текст";
 if OpenDialog1.Execute then            { Display Open dialog box }
 begin
   AssignFile(F, OpenDialog1.FileName); { File selected in dialog }
   Reset(F);
   Writeln(F, S);
   CloseFile(F);
 end;
end;

---

← →
Sandman25 ©   (2005-01-20 09:38) [5]

[3] cyborg ©   (20.01.05 09:24)
Вот так:

Procedure SaveFile(const FileName : String);

---

← →
cyborg ©   (2005-01-20 15:26) [6]

> [5] Sandman25 ©   (20.01.05 09:38)

Неправильно ;ор

---

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

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

Наверх

Память: 0.45 MB
Время: 0.036 c