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

Переменная типа Файл в качестве параметра   Найти похожие ветки 

← →
Megabyte ©   (2007-03-09 11:09) [0]

Хотел сделать процедуру с параметром типа TextFile.
Компилятор ругнулся: "File type not allowed here"
Неужели правда нельзя применять параметры типа файл?

---

← →
Сергей М. ©   (2007-03-09 11:14) [1]

> Неужели правда нельзя применять параметры типа файл?


А зачем ?
Чем, скажем, не угодил TFilestream ?

---

← →
Ega23 ©   (2007-03-09 11:16) [2]

> Хотел сделать процедуру с параметром типа TextFile.


А что тебе мешает сделать процедуру с параметром FileName?
А если с одним файлом надо в разных местах работать - с параметром TStrings?

---

← →
Megabyte ©   (2007-03-09 11:20) [3]

> А зачем ?
Чем, скажем, не угодил TFilestream ?

А хз. Что-то не подумал. Просто производится запись в файл, но в зависимости от условий:
While not adst.Eof do
 begin
   for i := 0 to adst.FieldCount-1 do
     if (i < 7) then
       write(afile, adst.Fields.Fields[i].Value, ";")
     else
       if (i = 7) then
       begin
         date_time := ConvertDateTime(adst.Fields.Fields[i].Value);
         write(afile, date_time, "");
       end
       else
       begin
         if (alast < adst.Fields.Fields[i].Value) then
           alast := adst.Fields.Fields[i].Value;
       end;
   writeln(afile);
   adst.Next;
 end;
С утра еще не проснулся видать :)

---

← →
Сергей М. ©   (2007-03-09 11:28) [4]

> С утра еще не проснулся видать :)


Похоже на то)
Ибо "запись в файл" и в Африке есть "запись в файл", а уж условная она там или безусловная - это по барабану

---

← →
begin...end ©   (2007-03-09 11:44) [5]

> Megabyte ©   (09.03.07 11:09)
> Неужели правда нельзя применять параметры типа файл?

Можно. Только они должны быть var- или const-параметрами.

---

← →
Megabyte ©   (2007-03-09 16:10) [6]

> begin...end ©  (09.03.07 11:44) [5]

> Megabyte ©  (09.03.07 11:09)
> Неужели правда нельзя применять параметры типа файл?

Можно. Только они должны быть var- или const-параметрами.

Спасибо!

---

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

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



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