Question

delphi ，sql，， 数据库 ，求助~~~~ 急~~~~~

delphi 对SQL数据库 导入数据，查询数据，添加数据比较成熟点的高手，最好能把插件的属性详细列举，谢谢~~~~

Answer 1

大概整理了一下，MSSQL直接用自带控件就成，MYSQL要第三方的，
连接，查询，写入，修改，删除 代码都在下面。
连接是MYSQL的，其他的都是MSADO的，但用法基本上一样，如果还是看不懂，建议你直接找别人帮你写程序吧。
mysql:

连接
var
Connection: TSQLConnection;
begin
Connection := TSQLConnection.Create(nil);
Connection.DriverName := 'dbxmysql';
Connection.GetDriverFunc := 'getSQLDriverMYSQL50';
Connection.LibraryName := 'dbxopenmysql50.dll';
Connection.VendorLib := 'libmysql.dll';
Connection.Params.Append('Database=NAME_OF_DATABASE);
Connection.Params.Append('User_Name=NAME_OF_USER');
Connection.Params.Append('Password=PASSWORD');
Connection.Params.Append('HostName=localhost');
Connection.Open;

// ... do stuff

Connection.Free;
end;

查询：
dm.adoquery1.SQL.Clear;
dm.adoquery1.SQL.Add('select * from czzh where 用户名="'+trim(edit_yhm.text)+'"');
dm.adoquery1.ExecSQL;
dm.adoquery1.Open;
dm.adoquery1.First;
if dm.adoquery1.Eof then begin
showmessage('用户名不存在，请确认！');
exit;
end;

写入：
dm.adoquery1.SQL.Clear;
dm.adoquery1.parameters.clear;
dm.adoquery1.SQL.Add('insert into rcwh(条形码,维护周期,最近维护日期,维护员,维护说明,设备名称) values (:a,:b,:c,:d,:e,:f)');
dm.adoquery1.Parameters.ParamByName('a').Value:=trim(edit_txm.Text);
dm.adoquery1.Parameters.ParamByName('b').Value:=strtoint(edit_whzq.Text);
dm.adoquery1.Parameters.ParamByName('c').Value:=date;
dm.adoquery1.Parameters.ParamByName('d').Value:=trim(edit_czy.Text);
dm.adoquery1.Parameters.ParamByName('e').Value:='设备入库';
dm.adoquery1.Parameters.ParamByName('f').Value:=trim(edit_sbmc.Text);
dm.adoquery1.ExecSQL;

更新
adoquery1.SQL.Clear;
adoquery1.SQL.Add('update gzwx set 维修人="'+trim(edit_wxr.text)+'",维修日期="'+wxrq+'",维修说明="'+trim(edit_wxsm.text)+'" where 条形码="'+trim(edit_txm.text)+'" and 故障原因="'+trim(edit_sbgz.text)+'"');
adoquery1.ExecSQL;

删除：
if application.messagebox('当前选中的采购订单记录是否删除','记录删除',MB_YESNO)=IDNo then exit;
adoquery3.Close;
adoquery3.SQL.Clear;
adoquery3.SQL.Text:='delete from db_cgdd where 订单编号="'+ddbh+'"';
try
adoquery3.ExecSQL;
except
showmessage('记录删除失败！');
exit;
end;

Answer 2

不知道你在求助什么？
不如把你要干的活叫高手代劳算了。

Answer 3

QQ:502943096

Answer 4

没有插件。直接用 TADOQuery 不行吗？