一个TDataBase,一个TQuery在加几个BUTTON和EDIT应该足够了
解决方案 »
- 关于fastreport的ChangePaper参数的含义
- 什么时候将数据源设置在系统DSN中什么时候设置在用户DSN中?
- imail 不能发送邮件,谁能告知原因?(在线等待)
- 哪里可以找到象C# Builder,VS.NET,Delphi 8.net中的PageControl的控件
- 文本编辑与显示,关于电子病历...
- Delphi / C++ Builder 持久对象 (程序对DFM文件读写) 500分求高手
- delphi中怎么编程实现关闭电脑扬声器的声音?
- 一个装控件的问题。24小时等候
- Delphi报错'jscript.dll'直接导致整个程序当掉!!!!!
- 如何使用SQL Server的binary类型?
- DELPHI中如何启动和停止NT服务?
- 请问:用SQL语句怎样实现模糊查询?是用统配符吗?具体怎么使用?
1、使用ADOConnection连接数据库
2、使用ADOQuery连接ADOConnection
3、类似的在触发查询的代码中写入以下的代码:
ADOQuery.Close;
ADOQuery.SQL.Clear;
ADOQuery.SQL.Add( 'Select * From Table Where UserName = ''' + EditName.Text + '''' );
Try
ADOQuery.Open;
Except
End;
ADOCommand1: TADOCommand;
ADOQuery1: TADOQuery;
if ADOConnection1.Connected then
begin
with ADOCommand1 do
begin
try
Connection := ADOConnection1;
CommandText := '';
CommandText := 'Update t_config set start_ip_addr =:start_ip,end_ip_addr =:end_ip';
Parameters.ParamByName('start_ip').Value := StartIPString;
Parameters.ParamByName('end_ip').Value := EndIPString;
Execute;
finally
end;
end;
end;使用SQL动态参数来解决。Delphi_Li(Delphi Li) :
你的这句:
ADOQuery.SQL.Add( 'Select * From Table Where UserName = ''' + EditName.Text + '''' );
可能不行罢?你的'''会被解释成为'' '你编译过没有?应该编译不过的。
query1.sql.clear
query1.sql.add(format('select * from yourtabel where key=%d' ,[edit1.text]));
query1.open;