高分向大家请教用Delphi的ado实现数据库操作的代码 ,100分!!!!

选择
with ADOQuery1 do
begin
  Close;
  SQL.Clear;
  SQL.Add(' Select * From Table1');
  Open;
end;新增
with ADOQuery1 do
begin
  Close;
  SQL.Clear;
  SQL.Add(' Insert Into Table1(Field1,Field2)');
  SQL.Add(' Values(100,200)');
  ExecSQL;
end;修改
with ADOQuery1 do
begin
  Close;
  SQL.Clear;
  SQL.Add(' Update Table1 Set Field1=200 Where Field2=200');
  ExecSQL;
end;删除
with ADOQuery1 do
begin
  Close;
  SQL.Clear;
  SQL.Add(' Delete From Table1 Where Field2=200');
  ExecSQL;
end;