Errores con los tipos de datos ayuda !

[llSnakell]

Ola quiero saber porque me arroja errores el delphi con respecto a este Programa, otra cosa , necesito que me muestre numeros decimales , y solo me aparece como enteros :S

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  num,tot:integer;
begin
  num:=strtoint(edit1.Text);
  tot:=(num*15)div 100;
  label4.caption:=' El 15% de '+inttostr(num)+' es '+inttostr(tot);
end;

con este me funciona el programa pero necesito que me muestre resultados decimales en caso de que asi sea, en cambio solo me muestra enteros.

Agradeceria su ayuda y disculpen por molestar con algo tan basico :S

Saludos