Combobox Problem

[Darksniper]

jetzt hab ich n anderes problem

Delphi-Quellcode:

procedure TForm3.Button9Click(Sender: TObject);
var stufe,Fl,Rf,Nf,Stufe2,M : Integer;
begin
  stufe := StrToInt (Edit31.Text);
  stufe2 := Stufe-1;
  Rf := StrToInt (Edit32.Text);
  Nf:= StrToInt (Edit33.Text);
  Fl := StrToInt (Edit34.Text);
 if ComboBox1.ItemIndex =0 then
  begin
   Label57.Caption := IntToStr (Trunc(200*power(2,Stufe2)));
   Label58.Caption := IntToStr (Trunc(1000*power(2,Stufe2)));
   Label59.caption := IntToStr(Trunc(200*power(2,Stufe2)));
   Label64.Caption := IntToStr (((200+1000)div(1000*(1+FL)))*60);
  end;
end;

Label64.Caption :=IntToStr (((200+1000)div(1000*(1+FL)))*60);

Das Label zeigt immer dann 60 an wenn FL den wert 0 hat.
Es zeigt aber immer dann 0 an wenn FL nicht null ist.

Die Zeile ist eine Miutenangabe