with query do begin close; sql.clear; sql.add('insert into '+ table.name () + 'values ('+要Insert的数据+')'); execsql; end;
with query do begin close; sql.clear; sql.add(delete table.name where ...'); execsql; end;
insert into table1 values(要Insert的数据) 如: insert into DICTIONARYLIST values( 100000, '!', '帐户类型', '0' );
with query do begin close; sql.clear; sql.add(delete from'+ table.name () + 'where ('+要delete条件+')'); execsql; end;
sql.add('insert into DICTIONARYLIST values( '+quotedstr('10000')+','+quotedstr('!')+','+quotedstr('帐户类型')+','+quotedstr('0')+')')
不用post命令将数据发送到数据库吗?
有SQL基本上用不到POST的,如果有TABLE还差不多
with query do begin sql.text:='insert 表名 values(:字段名,:字段名.....)'; ..... ..... execsql; end;with query do begin sql.text:='delete from table where filed=:field'; ..... .... execsql; end;
begin
close;
sql.clear;
sql.add('insert into '+ table.name () + 'values ('+要Insert的数据+')');
execsql;
end;
begin
close;
sql.clear;
sql.add(delete table.name where ...');
execsql;
end;
如:
insert into DICTIONARYLIST values( 100000, '!', '帐户类型', '0' );
begin
close;
sql.clear;
sql.add(delete from'+ table.name () + 'where ('+要delete条件+')');
execsql;
end;
begin
sql.text:='insert 表名 values(:字段名,:字段名.....)';
.....
.....
execsql;
end;with query do
begin
sql.text:='delete from table where filed=:field';
.....
....
execsql;
end;