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