[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

Код:

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

Код:

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).