| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Assigned? [D7]

Wolffgang ©   (2004-10-22 16:12:00) 

Здрасте.

var
 txtfile : textfile;
...
if ... then assignfile(txtfile, path);
...


if assigned(txtfile)=false then...
пишет Incompatible types

Вопрос: как например из другого модуля узнать, выполнен assignfile или нет?

---

Wolffgang   (2004-10-22 18:52:00) [1]

>[8] Действительно. В другом дело было. Всем спасибо.

---

Anatoly Podgoretsky   (2004-10-22 16:29:00) [2]

Wolffgang   (22.10.04 16:21) [5]
Почему?

---

Wolffgang   (2004-10-22 16:27:00) [3]

>[6] а разве повторное выполнение assignfile(txtfile, path) не вызывает исключение?

---

begin...end   (2004-10-22 16:24:00) [4]

> [4] Wolffgang   (22.10.04 16:20)
> ->[3] if assigned(txtfile)<>nil - Incompatible types

Естественно.

> [5] Wolffgang   (22.10.04 16:21)
> ->[1] выполнение assignfile(txtfile, path) нежелательно

Не понял.

---

Wolffgang   (2004-10-22 16:21:00) [5]

->[1] выполнение assignfile(txtfile, path) нежелательно

---

Wolffgang   (2004-10-22 16:20:00) [6]

->[3] if assigned(txtfile)<>nil - Incompatible types

---

begin...end   (2004-10-22 16:19:00) [7]

> 2] MacroDenS ©   (22.10.04 16:17)
> if assigned(txtfile)<>nil ....

???!!!

---

MacroDenS   (2004-10-22 16:17:00) [8]

if assigned(txtfile)<>nil ....

---

begin...end   (2004-10-22 16:16:00) [9]

Зачем это нужно?

---

Наверх