Батенька, вы бы сначала книжек каких почитали бы, а?..
Сделай глобальную переменную и пиши в нее.
Из Edit'а писать в переменную можно либо в строковую, либо с преобразованием типов, например
Код:
var
S : String;
I : Integer
F : Double;
begin
S := Edit1.Text;
I := StrToInt(Edit1.Text);
F := StrtoFloat(Edit1.Text);
...