三九宝宝网宝宝百科宝宝知识

delphi用access数据库做一个登陆界面

02月21日 编辑 39baobao.com

[怎样用access建立产品数据库]单击“开始”→”所有程序“→”MicrosoftOffice“→”MicrosoftAccess2010“,打开MicrosoftAccess2010软件。如下图所示在打开的MicrosoftAccess2010软件中选中“空数据库”...+阅读

用ADOTABLE连接数据库 adotable控件放置到登录窗口上 1。设置ADOTABLE的connect string 为 Provider=Microsoft.Jet.OLEDB.4.0;Data Source=test.mdb;Persist Security Info=True 2。设置ADOTABLE的tablename为db1 3。设置ADOTABLE的active为true 登录窗口代码 unit Unit2; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, DB, ADODB; type Tfm_login = class(TForm) Button1: TButton; Button2: TButton; id: TEdit; name: TEdit; ADOTable1: TADOTable; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var fm_login: Tfm_login; implementation uses Unit1; {$R *.dfm} procedure Tfm_login.Button1Click(Sender: TObject); begin IF Not adotable1.Locate('id',id.Text,[]) then begin SHOWMESSAGE('id不存在!'); end else begin if adotable1.FieldByName('name').AsString=name.Text then begin fm_main.Show; fm_login.Hide; end else begin SHOWMESSAGE('用户名错误!'); end; end; end; procedure Tfm_login.Button2Click(Sender: TObject); begin CLOSE; end; end. 主窗口代码 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type Tfm_main = class(TForm) procedure FormCreate(Sender: TObject); procedure FormClose(Sender: TObject; var Action: TCloseAction); private { Private declarations } public { Public declarations } end; var fm_main: Tfm_main; implementation uses Unit2; {$R *.dfm} procedure Tfm_main.FormCreate(Sender: TObject); begin application.CreateForm(Tfm_login,fm_login); end; procedure Tfm_main.FormClose(Sender: TObject; var Action: TCloseAction); begin application.Terminate; end; end.

以下为关联文档:

如何用access数据库2010做一个报表方法/步骤 第一步:双击桌面Access2010图标进入 第二步:在页面左上方选择一个空白数据库,点击进入 第三步:选择启用内容,并点击 第四步:选择选项卡中的创建,点击进入 第五步:选择表设...

lol登陆界面修改教程英雄联盟的登陆界面怎么改lol的玩家每天面对着千篇一律的登陆界面是不是也会觉得审美疲劳呢,小编就教大家一个简单的修改lol登录界面的方法 第一步:首先找到自己LOL安装目录下的TCLS/ui下的page.jpg 和...

急求一个access数据库的作业If Text3.Text = "" Then MsgBox "请输入软件版本?", vbInformation, "消息提醒" Exit Sub End If Adodc5.RecordSource = "select * from MOBILE" Adodc5.Refresh Adodc3.RecordSource...

数据库大作业:制作一个access数据库管理系统展开全部 数据库类型主要可分为: 网状数据库(Network Database)、 关系数据库(Relational Database)、 树状数据库(Hierarchical Database)、 面向对象数据库(Object-oriented Datab...

Access数据库作业1. 内容 (1)选择自己感兴趣的有实际应用价值的题材。 (2)选择难度和规模合适的题材,以便按时、保证质量地完成系统设计。2. 课程设计指导 (1)熟悉选材业务当课程设计的题目选择后,首...

delphi数据类型一、数据类型: (1) 基本数据类型: a、 整数类型: (通用类型:Integer-有符号;Cardinal-无符号) 具体: 有符号:Shortint,Smallint,Longint无符号:Byte,Word,LongiWordb、字符类型: (通用类型:Char...

怎样用Access 2013建立数据库表格打开Access应用软件。单击菜单栏“文件”。如下图: 2 在弹出的菜单栏中选择“新建"/"空白桌面数据库",如下图: 3 选择数据库的路径,单击“创建”,如下图: 4 数据库建立了,再创建数据表...

access数据库链接有两种接口可供选择:Microsoft.Jet.OLEDB.4.0(以下简称 Jet 引擎)和Microsoft.ACE.OLEDB.12.0(以下简称 ACE 引擎)。 Jet 引擎大家都很熟悉,可以访问 Office 97-2003,但不能访问 Of...

怎么用VC连接ACCESS数据库1.头文件引入ado库; 2.初始化com库; 3.写具体代码; 例如以下代码可以实现连接access数据库并读取字段内容到listbox中: void CSJKDlg::OnButton1() { // TODO: Add your control...

推荐阅读
图文推荐