Что такое 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;

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

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

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