VPF::Что начит recursively uses itself - Форум программистов

faost

Дата 1.3.2005, 18:55 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 114
Регистрация: 5.11.2004

Репутация: нет
Всего: 2

Я установил компонент AdvPageControl v1.4
Создал простое приложение с использованием этого компонента и при запуске получаю сообщение:
[Fatal Error] Program or unit 'AdvPageControl' recursively uses itself - т. е. "Программа или модуль 'AdvPageControl' использует себя рекурсивно".
Такая ошибка, как я знаю, появляется если подключить в uses модуля form1 сам модуль form1, чего я не делал. Демка, которая идет вместе с компонентом, запускается бес проблем.

--------------------

Если у вас нет проблем, значит вы уже умерли

SPrograMMer

Дата 1.3.2005, 19:10 (ссылка)

(нет голосов)

Загрузка ...

Спамер :)

Профиль
Группа: Участник
Сообщений: 442
Регистрация: 5.11.2004
Где: Краснодар

Репутация: 2
Всего: 6

А вот что: есть два модуля Unit1 и Unit2, скажем. Причем они ссылаются друг на друга
Но вот в Delphi`ях, как в прочем и в паскале, такую ссылку НЕЛЬЗЯ организовать в разделах Interface, с одним модулем можно но если оба модуля используют друг друга и подключаются они в части Interfce, получается досадная Error.
Проще говоря НЕВОЗМОЖЕН следующий вариант:

Код


Unit Unit1;
Interface
  Uses
      Unit2,....;
.....
End.

Код


Unit Unit2;
Interface
  Uses
      Unit1,....;
.....
End.

Нужно, что б ХОТЯБЫ одно из них (подключение другого модуля) было в части реализации, т е в Implementation, т е

Код


Unit Unit2;
Interface
.....
Implementation
  Uses
      Unit1,....;
End.

уф... высказался. smile

Это сообщение отредактировал(а) SPrograMMer - 1.3.2005, 19:12

--------------------

животное = зверь
законченный гентушник

faost

Дата 1.3.2005, 19:24 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 114
Регистрация: 5.11.2004

Репутация: нет
Всего: 2

Цитата(SPrograMMer @ 1.3.2005, 19:10)

А вот что: есть два модуля Unit1 и Unit2, скажем. Причем они ссылаются друг на друга

А при чем тут это?

--------------------

Если у вас нет проблем, значит вы уже умерли

SPrograMMer

Дата 1.3.2005, 20:00 (ссылка)

(нет голосов)

Загрузка ...

Спамер :)

Профиль
Группа: Участник
Сообщений: 442
Регистрация: 5.11.2004
Где: Краснодар

Репутация: 2
Всего: 6

А при том что у тебя модуль AdvPageControl использует в разделе Uses части Interface модуль, какой, посмотри сам, который, в свою очередь ссылается на твой AdvPageControl, то же в Части Interface.
Вот и получается рекурсивное использование.

--------------------

животное = зверь
законченный гентушник

faost

Дата 1.3.2005, 20:14 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 114
Регистрация: 5.11.2004

Репутация: нет
Всего: 2

Что собственно это ошибка значит и почему обычно она появляется, я понял (я это сказал еще в первом сообщении). Я не понимаю, почему она у меня появляется именно при использовании этого компонента:

Код

unit uMain;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,
  Dialogs, ComCtrls, ImgList, StdCtrls, AdvPageControl;

type
  TForm1 = class(TForm)
    AdvPageControl1: TAdvPageControl;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

end.

Скачал TMS TAdvPageControl v.1.4 я
Отсюда

--------------------

Если у вас нет проблем, значит вы уже умерли

Ap0k

Дата 1.3.2005, 20:20 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 48
Регистрация: 9.1.2005
Где: г.Ижевск

Репутация: нет
Всего: нет

Вполне вероятно что это ошибка в исходном коде самого компонента.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »