怎样在DELPHI 5.0 (代码)中加入SQL语句,使我能操纵数据库,我急须正确的方法。。
谢谢!!!!
谢谢!!!!
解决方案 »
- fastreport中子的用法
- 高分请教,不够再加!!!ocx控件开发IE激活问题
- 查询中引号的使用?
- 用query查询出来的内容怎么更改呢?我修改的时候,他说:不能修改一个只读dataset,可是我没有设任何只读啊!
- 急,请问哪里有<Delphi高级开发指南>!!
- 用ClientDataset连接一50万记录的TABLE,程序在激活时(ClientDataset.Active:=True)怎么会这么慢??
- 请教AContext AThread 应该怎么转换?
- 这可否实现,自动记录访问者的E-Mail地址?
- 唉,还是变量的问题!请教
- TO:zhang21cnboy(沧桑男人) 问您一个问题.
- 寻能图文共存的控件(如写字板,Word)
- 窗体存活周期???????
begin
Close;
Sql.Clear;
Sql.Add('DELETE FROM TableName WHERE 1=2');
ExecSQL;
end;
with query1 do
begin
close;
sql.clesr;
sql.add(......);
end;
begin
Close;
Sql.Clear;
Sql.Add('select * from youdb ');
open;
end;
将datesource1的dataset设为query1,dbgrid1的datasource设为datasourec1,
query1的databasename设为DBDEMOSunit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, DBTables, Grids, DBGrids;type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
DBGrid1: TDBGrid;
Query1: TQuery;
DataSource1: TDataSource;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
query1.close;
query1.sql.clear;
query1.sql.add('select * from items');
query1.open;
end;procedure TForm1.Button2Click(Sender: TObject);
begin
query1.Close;
end;end.
如:
query1.close;
query1.sql.clear;
query1.sql.add('加入SQL语句');
query1.open;
query1.close;
query1.sql.clear;
query1.sql.add('select * from tablename');
query1.open;
end;
如果是insert,update,delete 则query1.execsql;
ADO连接:AdoQuery有结果集返回:
with Query do
begin
Close;
Sql.Clear;
Sql.Add('Select * from TableName');
Open;
end;with Query do
begin
Close;
Sql.Clear;
Sql.Add('Update TableName Set Field1=Value1 where Field1=value2');
ExecSQL;
end;建议你找本入门的书,随便什么都讲到数据库。
genphone_ru(票票) 的例子告诉了你使用方法。注意,当有返回数据集时,要使用它的OPEN方法,否则使用EXECSQL方法。