网站解决方案设计,手机wordpress加载图片慢,电子商务网站开发主要实现功能,版面设计网站有哪些一个简单的Delphi7小程序#xff0c;使用MySql数据库做简单查询#xff0c;用DBGrid控件显示结果#xff0c;实现过程如下#xff1a;(1)在MySql中新建demouser表#xff0c;插入记录用于测试。(2)在Delphi7中新建项目。(3)在From中添加组件。组件Panel#xff1a;pnl1组…一个简单的Delphi7小程序使用MySql数据库做简单查询用DBGrid控件显示结果实现过程如下(1)在MySql中新建demouser表插入记录用于测试。(2)在Delphi7中新建项目。(3)在From中添加组件。组件Panelpnl1组件属性-属性值Caption-请输入工号组件Editedt1组件Buttonbtn1组件属性-属性值Caption-查询组件ADOQueryqry1组件属性-属性值Active-True //设置SQL属性后取得表中数据绑定的显示控件上可以实时出现数据ConnectionString-ProviderMSDASQL.1;Persist Security InfoFalse;Data SourceMySqlOdbcU //ODBC方式连接MySql参考http://blog.csdn.net/akof1314/article/details/6822902SQL-SELECT * FROM DEMOUSER;组件DataSourceds1组件属性-属性值DataSet-qry1 //绑定数据集ADOQuery组件DBGriddbgrd1 //认的情况下dbgrid的数据修改就和打开数据库直接修改一样修改完自动保存除非修改了readonly(只读) enable(可选中)这些属性的默认值或者单独修改了字段的这两个属性组件属性-属性值DataSource-ds1 //绑定数据源DataSourceEnabled-True //可选中ReadOnly-True //只读(4)在代码编辑窗口中增加代码。unitDataInMysql;interfaceusesWindows, 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;implementationusesUserMessage;{$R *.dfm}procedureTForm1.btn1Click(Sender: TObject);vars:string;begins:SELECT * FROM DEMOUSER where 11;if edt1.Text thenbegins:sand idedt1.Text;end;with qry1 dobeginClose;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.
