Mit if,then sætning virker ikke! Hvorfor?

Hej Morten...

>Jeg sidder med et probelm, min if then else sætning virker ikke og jeg kan sq ikke gennemskue hvorfor... er der nogen der kan hjælpe?

Der er faktisk en del fejl i, så jeg kan godt forstå at det ikke helt virker :-). Prøv det sådan her i stedet:

//CODE

if D>=0 then
begin
Np1resultatLbl.Caption:=FloatToStr(((-B)+Sqrt(D))/(x2*A));
Np2resultatLbl.Caption:=FloatToStr(((-B)-Sqrt(D))/(x2*A));
end
else
begin
Np1resultatLbl.Caption:=(Diskriminanten er under 0);
Np2resultatLbl.Caption:=(Diskriminanten er under 0);
end;

//CODE END

--
Mvh.

Kasper (TSW)
Webmaster

> Np1resultatLbl.Caption:=FloatToStr(((-B)+Sqrt(D))/(x2*A));
...
> Np2resultatLbl.Caption:=(Diskriminanten er under 0);

Der er nok en der lige har lært om anden gradsligninger eller hva'?

Niels
http://www.niller.f2s.com/ - always there...
http://g4s.dnsq.org/ - when I'm online!

Hmmm, lige en rettelse. Sådan her er lidt mere korrekt :-)

//CODE

if D>=0 then
begin
Np1resultatLbl.Caption:=FloatToStr(((-B)+Sqrt(D))/(x2*A));
Np2resultatLbl.Caption:=FloatToStr(((-B)-Sqrt(D))/(x2*A));
end
else
begin
Np1resultatLbl.Caption:= 'Diskriminanten er under 0';
Np2resultatLbl.Caption:= 'Diskriminanten er under 0';
end;

//CODE END

--
Mvh.

Kasper (TSW)
Webmaster

--
Mvh.

Kasper (TSW)
Webmaster