[Aleksbk]

Добрый день,
Объявляю переменную после public и пробую перед implementation
На второй форме не видит эту переменную, красным выделяет.
Доже обратится через вторую форму к первой пишет ошибку [Pascal Error] Unit2.pas(1): Unable to invoke Code Completion due to errors in source code
Помогите люди добрые)
Как вообще правильно передавать данные между формами?)

[NumLock]

добавить в список uses модуль, где объявлена глобальная переменная.

[Aleksbk]

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

добавить в список uses модуль, где объявлена глобальная переменная.

Меняя ComboBox и нажимаю кнопку в форму всегда 0 передает, может не так назначаю mat ?

форма 1

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34

unit Unit1;   interface   uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,   Dialogs, StdCtrls;   type   TForm1 = class(TForm)     ComboBox1: TComboBox;     Button1: TButton;     procedure Button1Click(Sender: TObject);   private     { Private declarations }   public     { Public declarations }   end;   var   Form1: TForm1;   mat:Integer;   implementation uses Unit2; {$R *.dfm}   procedure TForm1.Button1Click(Sender: TObject); begin mat:=ComboBox1.ItemIndex; Form2.Visible:=True; end;   end.

форма 2

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37

unit Unit2;   interface   uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,   Dialogs, StdCtrls;   type   TForm2 = class(TForm)     Edit1: TEdit;     procedure FormCreate(Sender: TObject);   private     { Private declarations }   public     { Public declarations }   end;   var   Form2: TForm2;   implementation uses Unit1; {$R *.dfm}   procedure TForm2.FormCreate(Sender: TObject); begin if mat=1 then Edit1.Text:='первая'; if mat=2 then Edit1.Text:='вторая'; if mat=0 then Edit1.Text:='ноль';   end;   end.

[poli-smen]

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

Меняя ComboBox и нажимаю кнопку в форму всегда 0 передает, может не так назначаю mat ?

У тебя во второй форме выборка из переменной mat происходит по событию FormCreate, т.е. при создании формы, а нажатие кнопки в первой форме происходит когда вторая форма уже создана (но скрыта). Тебе во второй форме нужно не событие FormCreate, а скорее всего FormShow (OnShow).