Lazarus中文社区

 找回密码
 立即注册(注册审核可向QQ群索取)

QQ登录

只需一步,快速开始

Lazarus IDE and 组件 下载地址版权申明
查看: 4230|回复: 0

连接数据库(mysql)问题

[复制链接]

该用户从未签到

发表于 2011-5-31 09:49:20 | 显示全部楼层 |阅读模式
    我想往数据库里面加数据,可是执行完后没有报错,数据库里面数据也没有增加,大家帮忙看下下面尤其是标红处有没有错误,如何让SQLquery指向数据库中的一个数据表,因为我的数据库中有好几个表,以前我就是这样的方法就没什么问题,但当时数据库里只有一个表,现在我也不知道怎么回事。还有大家有没有好点的连接数据库的控件或者方法,推荐下,谢谢
    formdata.MySQL50Connectionjbxx.CharSet:='utf8';
    formdata.MySQL50Connectionjbxx.HostName:='127.0.0.1';
    formdata.MySQL50Connectionjbxx.UserName:='root';
    formdata.MySQL50Connectionjbxx.Password:='';
    formdata.MySQL50Connectionjbxx.DatabaseName:='sy';
    formdata.MySQL50Connectionjbxx.Open;
    //Formdata.MySQL50Connectionjbxx.GetTableNames();
    //formdata.SQLQueryjbxx.Close;
    //formdata.SQLQueryjbxx.Open;
    //formdata.SQLQueryjbxx.DataSource.Name:='jibenxinxi';
    Formdata.SQLQueryjbxx.Close;
    Formdata.SQLQueryjbxx.SQL.Clear;
    Formdata.SQLQueryjbxx.SQL.Add('select * from jibenxinxi');
    Formdata.SQLQueryjbxx.Open;
    formdata.SQLQueryjbxx.Append;
    formdata.SQLQueryjbxx['bianhao']:=edit1.text;
    formdata.SQLQueryjbxx['xingming']:=edit2.text;
    formdata.SQLQueryjbxx['xingbie']:=combobox1.text;
    formdata.SQLQueryjbxx['minzu']:=edit7.text;
    formdata.SQLQueryjbxx['xueli']:=combobox3.text;
    formdata.SQLQueryjbxx['zhengzhimm']:=combobox4.text;
    formdata.SQLQueryjbxx['chushengrq']:=dateedit1.text;
    formdata.SQLQueryjbxx['dianhua']:=edit3.text;
    formdata.SQLQueryjbxx['xuexiao']:=edit4.text;
    formdata.SQLQueryjbxx['bumen']:=edit5.text;
    formdata.SQLQueryjbxx['zhiwu']:=edit6.text;
    formdata.SQLQueryjbxx['zhaopian']:='';
    formdata.SQLQueryjbxx['gongzuojingli']:=memo1.text;
    formdata.SQLQueryjbxx.post;                        
回复

使用道具 举报

*滑块验证:

本版积分规则

QQ|手机版|小黑屋|Lazarus中国|Lazarus中文社区 ( 鄂ICP备16006501号-1 )

GMT+8, 2025-8-28 17:47 , Processed in 0.052629 second(s), 9 queries , Redis On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表