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

Что такое Text?   Найти похожие ветки 

← →
Navi   (2005-06-13 13:04) [0]

В смысле System.Text? Приведенный ниже код работает, хотя вместо Text ИМХО д.б. TextFile.

procedure q;
var
 t: Text;
 S: string;
begin
 AssignFile(t, "d:\321.txt");
 Reset(t);
 Readln(t, S);
 ShowMessage(s);
 CloseFile(t);
end;

---

← →
Anatoly Podgoretsky ©   (2005-06-13 13:08) [1]

Оторвано от остального и не выдана информация об ошибках.
Подожди до вечера.

ЗЫ: так пишут, перешедшии с Паскаля 1-7

---

← →
Almaz ©   (2005-06-13 13:39) [2]

> Navi   (13.06.05 13:04)  
> В смысле System.Text? Приведенный ниже код работает, хотя
> вместо Text ИМХО д.б. TextFile.

А что Вас удивляет ? Тип Text никто не убирал - он как был объявлен в System так и остался. Тип этот полностью эквивалентен TextFile.

---

← →
pasha_golub ©   (2005-06-13 15:15) [3]

type
TextFile := System.Text;

---

← →
Anatoly Podgoretsky ©   (2005-06-13 15:31) [4]

pasha_golub ©   (13.06.05 15:15) [3]
Так нормально, только зачем?
type
T := TextFile;

---

← →
pasha_golub ©   (2005-06-13 16:12) [5]

Anatoly Podgoretsky ©   (13.06.05 15:31) [4]
Мне почему-то показалось, что он так объявлен... Ошибся. Этот тип встроен в компилятор.

---

← →
Anatoly Podgoretsky ©   (2005-06-13 16:28) [6]

Я про другое, как мне показалось, ты предлагаешь изменить текст, тогда зачем менять на заведомо старое, когда сразу можно менять на современноею
Текст предъявленый автором очень странный, одновременно из ТР (Text) и одновременно из Дельфи (AssignFile), каша какая то.

---

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

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



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