выдает ошибку проект Project1.exe вызвал исключение класса EConvertError с сообщением ''0.00005' is not a valid floating point value'

[Daytalt]

помогите плс. уже совсем отчаялся. не знаю в чём дело
var
r, y, p, t, c, l, x, z, a, b, d:Extended;
begin
begin
if Edit1.Text='' then ShowMessage('Введите все данные');
if Edit2.Text='' then ShowMessage('Введите все данные');
if Edit3.Text='' then ShowMessage('Введите все данные');
if Edit4.Text='' then ShowMessage('Введите все данные');
if Edit5.Text='' then ShowMessage('Введите все данные');
if Edit6.Text='' then ShowMessage('Введите все данные');
end;
r := StrToFloat(Edit1.Text);
y := StrToFloat(Edit2.Text);
p := StrToFloat(Edit3.Text);
t := StrToFloat(Edit4.Text);
c := StrToFloat(Edit5.Text);
l := StrToFloat(Edit6.Text);
x := power(r / tan(y),3) + (3 * p * t) / (sqr(tan(y)) * Pi * c * l);
z := power(x, 1 / 3);
a := z - (r / tan(y));
b := power(r, 3) + ((3 * p * t * tan(y)) / (Pi * c * l));
d := power(b, 1 / 3);
Form1.Label7.Caption := FloatToStr(a);
Form1.Label8.Caption := FloatToStr(d);
end;

[Аватар]

Дык запятую ждет вместо десятичной точки. А запятая прописана в качестве десятичного разделителя в настройках винды