Форма и дополнительный unit

[nikolai_P]

Добрый вечер!
Я пишу программу и создаю дополнительные unit-ы для отдельных процедур.
В процедуре дополнительного unit-a мне нужно обратиться к основной форме. Подскажите, пожалуйста, как это сделать?
Приведенным ниже образом у меня не получилось. По всей видимости я как-то должен сделать форму публичной:

Form1.Label1.Caption := "Text"

Код находится в unit2. Form1 соответствует unit1.

[raxp]

в дополнительном модуле добавьте uses unit1;

[nikolai_P]

Возникла циклическая ошибка:
[Fatal Error] Unit1.pas(7): Circular unit reference to 'Unit1'

[mihali4]

Unit1
...
implementation

uses Unit2;

{$R *.dfm}

и

Unit2
...
implementation

uses Unit1;

{$R *.dfm}

А вы в юните 1 "влупили" ссылку на себя саму...

[nikolai_P]

Посмотрите пожалуйста исходник. Я делаю именно так, как Вы и описали.
Результат тот же: [Fatal Error] Unit1.pas(7): Circular unit reference to 'Unit1'
publicform.rar

[raxp]

не так как описали.

[mihali4]

Сообщение от nikolai_P

Посмотрите пожалуйста исходник. Я делаю именно так, как Вы и описали

Ну где же "так же" ?
1. У вас в юните 1 объявление -

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Unit2;

Сравните с тем, как я вам написал...

2. А это - приведет к еще одной ошибке (я добавил двоеточие):

procedure printText;
begin
  Form1.Label1.Caption := 'Работает';
end;