Как вычислить переменную в одной процедуре, а использовать ее в другой?

[Gapeev]

Мне нужно создать переменную в одной процедуре, а использовать значение этой переменной в другой на Delphi,например

procedure TForm1.RadioButton3Click(Sender: TObject);
var z:extended;
begin
 z:=random(150);
end;

procedure TForm1.Button1Click(Sender: TObject);
var z,x:extended;
 x:=z+1;
end;

______________________
Используйте тег [CODE] (кнопка с решеткой # в форме сообщения) при вставке кода на форум.

[Alex11223]

Сделать ее глобальной или полем класса TForm1.

[Gapeev]

Каким образом можно это сделать, можешь кинуть пример?

[Serge_Bliznykov]

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

Мне нужно создать переменную в одной процедуре, а использовать значение этой переменной в другой на Delphi

вариант 1.
использовать глобальную переменную.

var z:extended;

procedure TForm1.RadioButton3Click(Sender: TObject);
begin
  z:=random(150);
end;

procedure TForm1.Button1Click(Sender: TObject);
  var x:extended;
begin
 x:=z+1;
end;

вариант 2.
использовать property (свойство) формы.

type
  TForm1 = class(TForm)
....
  public
     z:extended;
  end;

достаточно или ещё варианты написать?

[Gapeev]

ЗАРАБОТАЛО!!! Спасибо большое