DIV Problem (Integer?)

[Decadoria]

Hallo Ihr
Ich hab n problem und finde meinen Fehler nicht!
Und zwar geht es darum das ich in meinem Programm eine Rechnung machen will,
als ergebnis will ich aber nur GANZE zahlen ausgegeben bekommen.

Ich hab daher jetzt in meiner Rechnung mit DIV statt / gerechnet..
Allerdings bekomme ich nun immer folgende Fehlermeldung:

[Fehler] Unit1.pas(42): Operator ist auf diesen Operandentyp nicht anwendbar

Hier Nochmals mein Quelltext... Kann mir jemand sagen was ich jetzt Falsch gemacht habe???

var
Form1: TForm1;
L,H,L2,H2:real;


procedure TForm1.RechneClick(Sender: TObject);

begin
L:=strtoint (Laenge.text);
H:=strtoint (Hoehe.text);

if L>H then begin
L2:=L;
H2:=(L div 3)*2;
end
else
begin
H2:=H;
L2:=(H div 3)*2;
end;

Hoehe2.text:=inttostr(H2) ;
Laenge2.Text:=intttostr(L2) ;

end;


LG Deca

[DeddyH]

DIV funktioniert nur mit ganzen Zahlen, L ist aber vom Typ real.

P.S.: Willkommen in der DP

[mkinzler]

Warum deklarist du die Variablen als Reals und nicht als Integer?

[himitsu]

Warum sind eigentlich L,H,L2,H2:real; global deklariert, obwohl sie nur lokal benötigt werden?

Zitat von mkinzler:

Warum deklarist du die Variablen als Reals und nicht als Integer?

Vorallem da du ja eigentlich überall Integer haben wolltest.
siehe L:=strtoint , intttostr(L2) , div und vorallem

Zitat:

DIV Problem (Integer?)

Zitat:

[Fehler] Unit1.pas(42): Operator ist auf diesen Operandentyp nicht anwendbar

Operator = dein DIV
Operandentyp = Typ deiner Variable
Also, da kann man aus der Fehlermeldung herauslesen, daß die Variable einen unpassenden Typen besitzt, welcher nicht mit dieser Operation vereinbar ist.
PS: Für Fließkommazahlen nutzt man das / als Divisionsoperator.



Man hätte nicht alles fett schreiben müssen und der Code paßt auch ganz gut in ein [code]...[/code] oder sogar ein [delphi]...[/delphi] (der Knopf mit dem roten Helm) rein.
Für Fehlerstellen macht sich z.B. ein Kommentar ala // <<<<< hier ist es nicht verkehrt.

[Decadoria]

Aaaaaa Danke schön

Ich hatte das problem das am anfang immer die fehlermeldung kam das InttoFloat nicht möglich ist ^-^
Aber habe das problem behoben xD

danke euch xD

und das mit [delphi] und Code und so wusste ich nich - . - sorry

[Deep-Sea]

Zitat von Decadoria:

[...] die fehlermeldung kam das InttoFloat nicht möglich ist [...]

So eine Funktion gibt es auch nicht. Für was auch?!

[himitsu]

Er/Sie/Es meinte vermutlich StrToFloat und die Zuweisung an einen Integer.