Also das mit dem Plus sehe ich nicht sofort. Das mit dem Minus umso schneller:
Delphi-Quellcode:
if Sender = BtMinus then
begin
PRZ.Caption := '-';
if Nenner1 <> Nenner2 then
PRZ.Caption := '-';
NennerE := Nenner1*Nenner2;
ZaehlerE := (Zaehler1*Nenner2)-(Zaehler2*Nenner1);
end
Du setzt doch
NennerE := Nenner1*Nenner2;
ganz unabhängig davon ob die beiden Nenner gleich sind. Das kann so nicht wie gewünscht klappen...