Read

← →
Trip (2003-02-18 23:56) [0]

Создали файл(текстовый). Записали в него некоторое содержимое. Теперь это содержимое(строку) требуется извлечь в переменную. Пробуем Read(файл, переменная), говорит что несовместимы типы. Переменная бралась string и shortstring. Пробовал BlockRead. Не получается. Что делать?

← →
jack128 © (2003-02-18 23:59) [1]

Пример из хелпа

var

F: TextFile;
S: string;
begin
if OpenDialog1.Execute then { Display Open dialog box }
begin
AssignFile(F, OpenDialog1.FileName); { File selected in dialog box }
Reset(F);
Readln(F, S); { Read the first line out of the file }
Edit1.Text := S; { Put string in a TEdit control }
CloseFile(F);
end;
end;

← →
Trip (2003-02-19 00:13) [2]

Я ж говорю не получается! Говорит, что тип файла и переменной несовместимы. Хотя переменная стринговая, а файл текстовый.

Только что проверил - все работает. Код в студию...

Read Найти похожие ветки