Forum: Object-Pascal / Delphi-Language
by Aphton,
2. Mär 2011
Also so...
procedure TForm1.Button6Click(Sender: TObject);
var
neuA, neuB, neuC, neuD: Integer;
begin
neuA:=round(strtofloat(Edit1.Text));
neuB:=round(strtofloat(Edit2.Text));
neuC:=neuA div neuB;
Label1.caption:=inttostr(neuC);
neuD:=neuA mod neuB;
Forum: Object-Pascal / Delphi-Language
by Aphton,
2. Mär 2011
Ja, weil a und b Fließkommawerte sind und "div" nur bei Ganzzahlen (Integer) funktioniert.
Dafür einfach die Variablen lokal vom Typ Integer deklarieren!
Forum: Object-Pascal / Delphi-Language
by Aphton,
2. Mär 2011
StrToFloat ist genauso wie Round eine Funktion, die bestimmte Parameter verlangt! Der einen übergibst du einen Parameter, der anderen nicht!