文件名称:一个Delphi程序人机录入窗口实例源代码.rar
文件大小:7KB
文件格式:RAR
更新时间:2022-07-30 12:44:03
Delphi源码-界面编程
一个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); begin CLOSE; end; procedure TForm1.BitBtn4Click(Sender: TObject); begin Close; end;
【文件预览】:
srcfans.com
----录入程序()
--------Project1.res(876B)
--------Unit1.dfm(6KB)
--------Unit1.ddp(51B)
--------Project1.cfg(434B)
--------Unit1.pas(1KB)
--------Project1.dpr(188B)
--------Project1.dof(2KB)
--------Unit1.dcu(5KB)