Forum: Object-Pascal / Delphi-Language
Delphi
by Emilio,
24. Mär 2006
@marabu,
ich glaube das war's!
Habe die Deklaration 'lvpneu := EditCurr2.Value' an den Beginn der Prozedur ( welche die jeweiligen CalcRules aufruft) eingetragen und es funktioniert. Ist mir noch nicht ganz klar warum, da die CalcRule01 ange ... Stopp! - Guten morgen Emilio! - ist doch klar. :wall:
Habe jetzt zwar an anderer Stelle eine ungültige Gleitkommaoperation, aber da werde ich...
Forum: Object-Pascal / Delphi-Language
Delphi
by Emilio,
24. Mär 2006
ah jetzt ja!
strange - der lvpneu hat einen Wert von 0,20981 ... e-4933
mit so einem Wert könnt ich auch nicht rechnen. Aber woher kommt denn der?
Forum: Object-Pascal / Delphi-Language
Delphi
by Emilio,
24. Mär 2006
Danke!
Es kömmt die Meldung: undefinierter Bezeichner.
Kommt aber auch bei allen anderen Variablen in der CalcRule03
Forum: Object-Pascal / Delphi-Language
Delphi
by Emilio,
24. Mär 2006
Hi Marabu,
nein, da ich auf diese Idee nicht gekommen bin
und (bitte nicht schlagen!) ich nicht weiß wie ich, wie ich die Variable inspizieren könnte. Angehalten an diesem Punkt habe ich, aber dann?
@Khananka,
Danke für Deinen Hinweis. Dieser Gedanke ist mir auch gekommen. Aber wie könnte ich der Prozedur den Wert für LVP (also lvpneu := eDitCurrX.Value) mitteilen?
VG
Forum: Object-Pascal / Delphi-Language
Delphi
by Emilio,
24. Mär 2006
Moin Moin,
üps - zu fix den "senden" Button gedrückt ...
hier der Rest:
// *** Berechnung der Parameter, wenn ein ekneu und ein lvpneu eingegeben wurde ***
Forum: Object-Pascal / Delphi-Language
Delphi
by Emilio,
23. Mär 2006
Moin allerseits,
ich erhalte die Fehlermeldung "Gleitkommaüberlauf" in der markierten Prozedur und habe keine Idee, woher sie kommt, warum und v.a. wie ich sie wegbekomme:
//. . . wenn noch kein neuer LVP eingetragen wurde
if EditCurr2.Value = 0 then
begin
CalcRule01(ekneu, zuschlag, BPAlt, LVPAlt, MwSt, BruttoLVPAlt, MargeEAlt, ProvSatz,
ProvLVPAlt, bpneu, bpaender,...