fujingdcn 发表于 2007-8-22 10:29
[求助]初学者请教:delphi怎么连接sql server
麻烦大家: <BR>我在sql server 的 企业管理器中建立了一个连接到本机(192.168.0.241)的sql server组,在里面的pubs数据库中建立了一个test(id,name,descrip)表.我想用delphi对这个表进行操作,添加删除什么的.并将结果显示出来.我应该怎么办呢.谢谢各位了,讲的详细一点点就好,我初学的什么都不会.<BR>
hln26460822 发表于 2007-9-14 16:40
<P>你可以用ADO里的ADOQUERY 或者ADOTABLE等空间来连接</P>
danning813 发表于 2007-9-19 15:16
人家也是一样的，应该会知道那些东西，就代码有困难！<BR><BR>怎么写那些添加，删除什么的代码！？
hln26460822 发表于 2007-9-20 10:06
<P><BR> <BR> 举个例子:<BR>先拖个ADOquery,DataSource,DBGrid 等控件.设置连接属性.<BR>然后连接到SQL Server,可以静态连接,也可以动态连接.我就说下静态的连接方法.<BR>ADOQuery的属性里有个ConnectionString,点击连接你所在数据库的位置就可.<BR>新增:<BR>建个小窗体来进行添加或者修改,比如叫:FrmMessage(窗体名)<BR>FrmMessage:= TFrmMessage.Create(self);<BR>try<BR> if FrmMessage.ShowModal =mrok then<BR> begin<BR> adoquery.append;<BR> adoquery.fieldbyname('字段名').asstring:= 你另个输入窗体输入的东西;<BR> ....<BR> adoquery.post;<BR> end;<BR>finally<BR> FreeAndNil(FrmMessage);<BR>end;<BR><BR> <BR>删除<BR>先定义变量 var asql:string;<BR> id:string; //要删除记录的ID<BR>if adoquery.isempty then exit;<BR>id:= adoquery.fieldbyname('id').asstring;<BR>adoquery.close;<BR>adoquery.sql.clear;<BR>asql:= format('delete from test where id=''%0:s'' ',[id]);<BR>adoquery.aql.add(asql);<BR>adoquery.exexsql;<BR></P>
页:
[1]
