Přidat otázku mezi oblíbenéZasílat nové odpovědi e-mailemVyřešeno Delphi 7 - program na výpočet procent ze zadané ceny

V Delphi neumím, ale není třeba přepsat datový typ z Integer na Float?
PS: Tj. asi takto:

var
  cena, procento: Float;
begin
  cena := StrToIntDef(Edit1.text, -1);
  procento := StrToIntDef(Edit2.Text, -1);
  if (cena = -1) or (procento = -1) then
    Label1.Caption := 'chybné zadání'
  else
    Label1.Caption := FormatFloat('0.00', cena/100*procento);
end;

PS2: A IMHO to nebude fungovat s desetinnou čárkou, ale s desetinnou tečkou

Reakce na odpověď

1 Zadajte svou přezdívku:
2 Napište svou odpověď:
3 Pokud chcete dostat ban, zadejte libovolný text:

Zpět do poradny