Текущий архив: 2008.02.24;
Скачать: CL | DM;

Вниз

Переменная в процедуре .. живучая   Найти похожие ветки 

← →
Германн ©   (2008-01-19 02:33) [40]

> rts111 ©   (19.01.08 02:06) [38]
>
>


> ts111 ©   (19.01.08 02:09) [39]
>
>

Завтра(сегодня) проверю, если понадобится. Сейчас - занят. Нет времени.

---

← →
jack128 ©   (2008-01-19 03:47) [41]

> то, далее в модуле будет уже $J-

нуно примерно так:

{$IFOPT J+}
 {$DEFINE J_Defined}
{$ENDIF}

{$J+}
const
 uiop: Integer = 10;

{$IFNDEF J_Defined}
 {$J-}
{$ENDIF}
{$UNDEF J_Defined}

---

← →
rts111 ©   (2008-01-19 12:31) [42]

> Заодно ещё один вопрос.
> Как проверить создан ли объект?


Вот так еще надежнее будет, скажем чем просто проверка на nil, но тоже не 100%
if TObject(MyObject) is TMyClass then ...

---

← →
TUser ©   (2008-01-19 15:03) [43]

У функций таким свойством обладает переменная result.

---

← →
ketmar ©   (2008-01-20 16:49) [44]

>[42] rts111 ©(19.01.08 12:31)
это типа шутка юмора такая? не удалась.

---

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

Текущий архив: 2008.02.24;
Скачать: CL | DM;

Наверх

Память: 0.54 MB
Время: 0.019 c