-
unit Child1Unit;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TChildForm1 = class(TForm)
procedure FormClose(Sender: TObject; var A
http://www.codebf.com/read/299226/7876339
-
unit unitFrmMain;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm1 = class(TForm)
procedure FormKeyDown(Sender: TObject; var Key
http://www.codebf.com/read/299226/7876990
-
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
procedur
http://www.codebf.com/read/299226/7877054
-
unit unitFrmMain;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
pr
http://www.codebf.com/read/299226/7877333
-
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm1 = class(TForm)
procedure FormPaint(Sender: TObject);
private
http://www.codebf.com/read/299226/7877389
-
unit UnitDll;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm1 = class(TForm)
procedure FormClose(Sender: TObject; var Action: T
http://www.codebf.com/read/299226/7877762
-
unit Child2Unit;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TChildForm2 = class(TForm)
procedure FormClose(Sender: TObject; var A
http://www.codebf.com/read/299226/7878016
-
unit Child1Unit;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TChildForm1 = class(TForm)
procedure FormClose(Sender: TObject; var A
http://www.codebf.com/read/299226/7878019
-
4 学生成绩档案管理系统的功能实现
本软件的主要目标是实现学校学生信息管理的自动化,主要功能是对有关学生信息的存储与查询管理。
4.1登录系统模块编码设计
系统启动后,将首先出现用户登录窗体如下,用户首先输入用户名,然后输入密码。
procedure Tlogin_form.BitBtn1Click(Sender: TObject);
var
pass:variant;
be ...
http://www.codebf.com/read/397981/8011824
-
unit Unit7;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm7 = class(TForm)
procedure FormClose(Sender: TObject; va
http://www.codebf.com/read/397756/8024593