Робота с формой

[Олександр17]

Возможно ли в form2 например а:=5 и потом ето значение перенести у form1
так чтоб какоето значение стало равно а например b

[MyLastHit]

Используя компоненты Memo/Edit/RE/ да хоть Капшон у кнопки. В них передаешь данные нужной переменной Form2, а потом из другой формы посредством методов обьекта обращаешься к ним.
Пример:
Form2:

edit1.text:=floattostr(a);
Form1:
b:=strtofloat(form2.Edit1.text);

[BiTiK]

1 форма:

...
type
TForm1 = class(TForm)
Label1: TLabel;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation
uses Unit2; //подключаем 2 форму
{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Caption:=inttostr(unit2.a);
end;

end.

2 форма:

...
type
TForm2 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form2: TForm2;
a:Integer;
implementation

{$R *.dfm}

procedure TForm2.FormCreate(Sender: TObject);
begin
a:=100;
end;

end.