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

Вниз

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]

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

---

← →
jack128   (2003-02-19 00:16) [3]

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

---

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

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

Наверх

Память: 0.44 MB
Время: 0.008 c