Скачать: CL | DM;

Вопрос по $IFDEF   Найти похожие ветки 

← →
Maxim2030   (2003-03-05 10:27) [0]

Почему не работает код :

{$DEFINE XXX}

type
{$IFDEF XXX}
TMyClass = class(TObject)
{$ELSE}
TMyClass = class(TComponent)
{$ENDIF}

причем какая-то странаая ошибка выскакивает...

---

← →
Юрий Зотов ©   (2003-03-05 10:38) [1]

Ошибка не здесь. А что мешало привести ее текст?

---

← →
Maxim2030   (2003-03-05 10:42) [2]

Expected ":" but "=" found.

выдается в виде диалогового окна, при начале компиляции и при F1 в любом месте модуля :(

---

← →
MBo ©   (2003-03-05 12:46) [3]

В каком-то месте присвоение неправильно написано или (скорее)
описание переменной (i=integer)

---

← →
Игорь Шевченко ©   (2003-03-05 13:14) [4]

Побольше кода, хорошего и разного :-)

---

← →
Юрий Зотов ©   (2003-03-05 13:30) [5]

> Maxim2030 (05.03.03 10:42)

Ну и при чем здесь $DEFINE? Обычная синтаксическая ошибка. Что мешало ткнуть по сообщению мышкой и внимательно просмотреть на код программы?

---

← →
Maxim2030   (2003-03-05 14:16) [6]

разобрался.

Исходный код выглядел так:
{$R *.DFM}
...

{$IFDEF CONFIG}
TTemplateForm = class(TForm2)
{$ELSE}
TTemplateForm = class(TForm)
{$ENDIF}

падала из-за DFM

А так работает
{$IFDEF CONFIG}
TCustomTemplateForm = class(TForm2);
{$ELSE}
TCustomTemplateForm = class(TForm);
{$ENDIF}

TTemplateForm = class(TCustomTemplateForm)

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c