Function Ceil

Uses Unit Math

A função Ceil retorna o mais próximo número inteiro maior que o número passado como parâmetro.

Sintaxe da sua utilização:

Ceil(Valor);

Ex:

procedure TForm1.Button15Click(Sender: TObject);begin
       Label1.Caption:=IntToStr(Ceil(15.3)); //Passa o próximo valor inteiro
end;