MwSt-Berechnung mit ComboBox

[LOMBI]

Hallo,

auf meiner Form befinden sich

ComboBox für die MwSt-Auswahl
EditVKnetto
EditVKbrutto

Nun würde ich gerne mit der ComboBox die Berechnung der MwSt. für Feld VKbrutto durchführen:

0= MwSt-Satz 0,00%
1= MwSt-Satz 7,00%
2= NwSt-Satz 16,00%

Im OnActivate der Form könnte auch schon "2" als Vorgabe in der CB stehen.

Wer hilft mir bitte, diese MwSt-Funktion zu realisieren?

Gruß
Lombi

[mkinzler]

im onChange der ComboBox

Delphi-Quellcode:

case ComboBox.ItemIndex of
0: faktor := 1;
1: faktor := 1.07;
2: faktor := 1.14;
end;
EditVKbrutto := ditVKnetto * faktor;

[LOMBI]

Danke mkinzler,

für Deine Hilfe!

[LOMBI]

Erhalte die Meldung: Undef. Bezeichner: 'faktor';
Was ist bitte zu tun?

[mkinzler]

Du mußt die Vraiable Netto als Real deklarieren.

Außerdem solltest du die eigentliche Berechnungszeile auf

EditVKbrutto.Text := ditVKnetto.Text * faktor; ändern.

Habe beim schnellen Eintippen die .Text vergessen

[LOMBI]

Muß denn nicht "faktor" als var deklariert werden?
Wie bitte wird in diesem Zusammenhang Real benützt?
Habe mit so was noch nicht gearbeitet und mit der D3-Hilfe
komme ich nicht weiter.

[marabu]

Hallo Lombi,

hier hast du ein wenig Code zum studieren.

Grüße vom marabu

[Hansa]

ähhm, *räusper*

Zitat von mkinzler:

EditVKbrutto.Text := ditVKnetto.Text * faktor;

Ist das Dein Ernst ? Oder sind das etwa spezielle mkinzler-Texte mit Zahlen-features ?

Herr Kinzler. Vorgestern war wohl nicht Ihr Tag, was ? Was sehe ich denn hier noch :

Zitat von mkinzler:

2: faktor := 1.14;

Muß natürlich 1.16 heißen. Nicht so schlimm, aber es besteht immer eine potentielle C+P Gefahr und einen der noch dazu schlecht sieht.