Ich habe vor das Ergebniss in einem Label auszugeben.
Hier der Quelltext der Formel:
----------------------------------------------------------------------
procedure TMehrwertsteuerrechner.Button2Click(Sender: TObject);
var nettoeingabe, nettoausgabe : int64;
begin
nettoeingabe:=StrToInt(Edit2.Text);
nettoausgabe:=nettoeingabe div 100 * 116;
Label8.Caption:=IntToStr(nettoausgabe);
end;
-------------------------------------------------------------------
Da ich in meinem Beruf als selbstständiger sehr viel mit der Steuer zu tun habe habe ich mir gedacht ein Programm zu schreiben mit dem ich diese schnell ausrechnen kann.