Delphi 中怎么实现一个公式求整数去掉小数点后面部分，和怎么让程序关闭后在打开edit显示关闭前的数据。

1、关于取整，你没说取整规则。
添加引用：Math
直接删除小数部分，返回整数：trunc，如果trunc（2.234），则返回 2。其他：
trunc 和 round 是 system unit 里的函数，缺省就可以用。
floor 直接往小的取，比如 floor(-123.55)=-124，floor(123.55)=123
trunc 直接切下整数，比如 trunc(-123.55)=-123, floor(123.55)=123
ceil 直接往大的取，比如 ceil(-123.55)=-123， ceil(123.55)=124
round 计算四舍五入，比如 round(-123.55)=-124，round(123.55)=124

2、重启后text自动读取
两种方案，写注册表，或者写ini文件。
写注册表：不用额外添加文件，速度快，但会使注册表变大。不过数据少也无所谓了。
写ini文件：需要生成额外的文件。引用IniFiles。
procedure TForm1.Button2Click(Sender: TObject);
var
ini:TIniFile;
num : integer;
name: string;
begin
Ini := TIniFile.Create('c:\aa.ini');
//读取
num:= ini.ReadInteger('nums','num1',0);
name:= ini.ReadString('names','name1','');
//写入
name := '李三';
num := 1;
ini.WriteString('names','name1',name);
ini.WriteInteger('nums','num1',num);
end;

在你的窗口退出时onclose事件，把每个text的内容写入ini文件
在你的窗口启动时onCreate事件或其他，读取，并给text赋值。

delphi的取整函数round、ceil和floor
round 四舍六入五留 round(11.5) = 12 round(12.5) = 12
floor 向下取整。 floor(11.234)=11 cell 向上取整 cell(11.123)=12

想关闭后再显示 那就得找个地方把值存起来。是我就会存到ini中。

1. 求整数用Roundto()函数。
2. 保存数据，关闭前将数据存储在临时文本文件，一般用ini文件为好。