Не могу понять что не так?

[ShadowMas]

Люди помогите пожалуйста, начал разбираться с Delphi и застопорился с вроди бы простой и понятной програмкой :(

Нужно чтобы в Текстовой строке "Label6" или в поле ввода "Edit5" при нажатии кнопки "Button1" считалась вот такая простая формула:
y:= x1*(1.013- 0.0267123*x2)

вот строки кода:



procedure TForm1.Button1Click(Sender: TObject);

var

x1:integer;

x2:integer;

y:Variant;

begin

x1:=Edit1.Text;

x2:=Edit3.Text;

y:=Edit5.Text;

y:= x1*(1.013- 0.0267123*x2);

end;

end.


Подскажите где ошибка?

[Admiral]

ShadowMas,
y:= x1*(1.013- 0.0267123*x2);
Edit5.Text:=y;

[engwar]

procedure TForm1.Button1Click(Sender: TObject);

begin
Edit5.text:= floattostr((Strtofloat(Edit1.text)*(1.013- 0.0267123*strtofloat(edit3.text)));
end;

end.

x1:=Edit1.Text;
x2:=Edit3.Text; »
а тут ты пытаешься числовой переменной присвоить строковое значение

[ShadowMas]

Ясно сенкс за ответ буду пробывать!!!

[ShadowMas]

Спасибо огромное тут одна скобка я так понял лишняя

Edit5.text:= floattostr((Strtofloat(Edit1.text)*(1.013- 0.0267123*strtofloat(edit3.text)));

Всё получилось ЕЩЁ раз огромное спасибо всем кто ответил!