delphi7 mysql控件_Delphi7连接MySql数据库-DBGrid控件显示数据
一个简单的Delphi7小程序,使用MySql数据库做简单查询,用DBGrid控件显示结果,实现过程如下:
(1)在MySql中新建demouser表,插入记录用于测试。
(2)在Delphi7中新建项目。
(3)在From中添加组件。
组件Panel:pnl1
组件属性-属性值:
Caption-请输入工号:
组件Edit:edt1
组件Button:btn1
组件属性-属性值:
Caption-查询
组件ADOQuery:qry1
组件属性-属性值:
Active-True //设置SQL属性后取得表中数据,绑定的显示控件上可以实时出现数据
ConnectionString-Provider=MSDASQL.1;Persist Security Info=False;Data Source=MySqlOdbcU //ODBC方式连接MySql,参考:http://blog.csdn.net/akof1314/article/details/6822902
SQL-SELECT * FROM DEMOUSER;
组件DataSource:ds1
组件属性-属性值:
DataSet-qry1 //绑定数据集ADOQuery
组件DBGrid:dbgrd1 //认的情况下,dbgrid的数据修改就和打开数据库直接修改一样,修改完自动保存,除非修改了readonly(只读) enable(可选中)这些属性的默认值或者单独修改了字段的这两个属性
组件属性-属性值:
DataSource-ds1 //绑定数据源DataSource
Enabled-True //可选中?
ReadOnly-True //只读?
(4)在代码编辑窗口中增加代码。
unitDataInMysql;interface
usesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, ADODB,ComObj, Grids, DBGrids, ExtCtrls;typeTForm1= class(TForm)
qry1: TADOQuery;
ds1: TDataSource;
btn1: TButton;
dbgrd1: TDBGrid;
pnl1: TPanel;
edt1: TEdit;procedurebtn1Click(Sender: TObject);private
{Private declarations}
public
{Public declarations}
end;varForm1: TForm1;implementation
usesUserMessage;{$R *.dfm}
procedureTForm1.btn1Click(Sender: TObject);vars:string;begins:='SELECT * FROM DEMOUSER where 1=1';if edt1.Text<>'' then
begins:=s+'and id='+edt1.Text;end;with qry1 do
beginClose;
SQL.Clear;
SQL.Add(s);
Open;end;end;end.
(5)运行项目,保存文件。
效果如下:
注意:选择【Project | View Source】,可以创建一个缺省的Delphi项目文件的源代码(.DPR),修改后双击它打开对应的项目,避免点击启动时总是启动其他项目。
programProject3;usesForms,
DataInMysqlin 'DataInMysql.pas' {Form1}; //改这儿{$R *.res}
beginApplication.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;end.
delphi7 mysql控件_Delphi7连接MySql数据库-DBGrid控件显示数据相关推荐
- 【全教程】qt连接mysql——从qt编译mysql驱动到qt连接mysql数据库(二、编译连接)
本篇教程分为三个部分: [全教程]qt连接mysql--从qt编译mysql驱动到qt连接mysql数据库(一.编译连接前准备) [全教程]qt连接mysql--从qt编译mysql驱动到qt连接my ...
- macOS安装MySQL,使用Navicat连接MySQL数据库/2022
macOS安装MySQL,使用Navicat连接MySQL数据库/2022 intel chip 下载安装文件 进入官网 MySQL :: MySQL Downloads 选择页尾MySQL Comm ...
- 【全教程】qt连接mysql——从qt编译mysql驱动到qt连接mysql数据库(一、编译连接前准备)
一.说明 电脑系统:win10 qt版本:5.13.2和5.14.1(测试均成功) mysql版本:MySQL-5.5 本篇教程分为三个部分: [全教程]qt连接mysql--从qt编译mysql驱动 ...
- php设置mysql查询编码,php连接mysql时怎么设置编码方式
php连接mysql时怎么设置编码方式 php连接mysql数据库时,也就是在mysql_connect()语句之后添加"mysql_query("set names utf8&q ...
- php连接mysql乱码原因_PHP连接MYSQL出现乱码的原因与解决办法
PHP连接mysql出现乱码的原因与解决方法 解决MySql数据库乱码的一个首要前提是保证 数据库+数据表+前端显示 编码一致,国内项目一般统一设定为GB2312或GBK,而国际化项目则一般使用utf ...
- java连接mysql抛异常_Java 连接MySQL数据库 插入中文 抛出异常
mysql数据库字符集设为默认: 下面解决好的代码,没乱码,我测试过的 String sContent = new String(request.getParameter("content1 ...
- mysql安装连接测试c_C连接MySQL数据库开发之Windows环境搭建及测试_MySQL
一.开发环境 Win8.1 64位.VS2013.MySQL5.5.3764位 MySQL安装目录为:C:/Program Files/MySQL/MySQL Server 5.5二.配置工程环境 首 ...
- centos sqldeveloper 连接mysql,Oracle SQL Developer 连接 Mysql 等数据库
Oracle SQL Developer 个人感觉是比较好用的工具,因此除了连接oracle之外,还可以连接其他的数据库,如:MySQL,Access等.但是,它默认情况下只能连接Oracle和Acc ...
- web.py mysql_用Web.py 连接 MySQL 的时候怎么样连接远程数据库
展开全部 看了web.py源码,关于连接数据库的函数如下(webpy/web/db.py): 1133 _databases = {} 1134 def database(dburl=None, ** ...
最新文章
- 2021年大数据HBase(十一):Apache Phoenix的视图操作
- v8学习笔记(一) 调用层次
- C# socket nat 映射 网络 代理 转发
- 【转】什么是ERP、SCM、CRM?
- 惨遭打脸:字节某部门竟然有这么多测试
- DHCP+NAT+IP隧道
- 浙大计算机专业硕士专业代码,浙江大学海洋学院电子信息(专硕)专业代码
- GitHub使用技巧,在线ide编辑代码、在线运行代码、快速查找阅读代码
- cocos2d实现画笔功能及常用的绘制函数
- 拟立法禁止采购有漏洞软件,“引爆”网络安全行业
- 微型计算机的主机通常指什么,微型机主机是指什么
- IBM再次出手,蓝色巨人收购蓝色巨狼
- 关于台电X16 plus (Tpad)安装win10系统
- tesseract-ocr在mac下的使用汇总
- html5支持.9.png,javascript-当Alpha透明时,HTML5 Canvas转换为PNG会将所有通道归零
- Photoshop简单案例(8)——利用文字工具修改图片上文字
- Core Techniques And Algorithms In Game Programming
- 使用Windows任务计划自动运行Python程序
- svn 出现 Upgrade working working copy
- 那些年你追过的女孩——颜值到底有几分???
热门文章
- mysql 聚簇索引和非聚簇索引_MySQL 聚簇索引 二级索引 辅助索引(上两期中奖名单)...
- 红旗Linux网卡绑定,Linux bonding 之balance-alb 原理介绍及其实现
- 史上最详细的IDEA优雅整合Maven+SSM框架(详细思路+附带源码)
- 企业实战_13_MyCat清除冗余数据
- 微信小程序---实现输入手机验证码功能
- python特征工程插件_python特征工程
- js统计html页面访问的次数6,JS综合篇--[总结]Web前端常用代码片段整理
- C语言 数组排序 – 选择法排序 - C语言零基础入门教程
- Linux怎么把目录设置群组,linux设置目录和文件使用权限
- php 生成树,PHP超牛逼无限极分类生成树方法