一个Delphi程序人机录入窗口实例源代码.rar

一个Delphi程序录入窗口【源码】，是一个供用户向数据库中输入数据的用户界面，很多数据库系统都需要类似的界面，本例比较基础，面向Delphi初学者。核心代码： 　　procedure TForm1.Edit4Exit(Sender: TObject); 　　begin 　　IF Edit4.text'' then 　　Edit5.Text := Format('%7.2m', [StrToFloat(Edit4.Text)* StrToFloat(edit3.text)]); 　　end; 　　procedure TForm1.Button3Click(Sender: TObject)