我想知道3中情况
1:删除最后1行内容2:删除全部内容3:删除指定标示行(引索)行
1:删除最后1行内容2:删除全部内容3:删除指定标示行(引索)行
解决方案 »
- fieldbyname和Fields他们那有什么去别的
- 关于用idftp控件被动连接ftp
- 新手提问:大家来看一下代码!
- delphi中判断保存数据库是否成功,不成功则rollback,这个如何写??
- gulong的问题
- socket多线程中,服务端向客户端发送返回信息,为什么我的客户端收不到,大侠帮我看看
- 100.分散分,一直对自定义过程和字定义函数的形参不太了解,请前辈就参数定义的问题说说定义的经验.
- 请教一个问题?
- 字符串操作: str:='#9good'怎么转换成str:=#9+'good';? 注意了:#9是Tab键值.
- 求救,本人想写一个图片格式转换的程序,请问会用到什么函数
- adoquery 多条件查询?
- Delphi往远程的mysql中insert数据时乱码(而本地却没有)急急
var
str:String;
begin
//删除全部内容量
with adoquery1 do
begin
Close;
Sql.Clear;
Sql.Add('Delete * From 表名');
ExecSQL;
end; //删除指定标识行
with adoquery1 do
begin
Close;
Sql.Clear;
Sql.Add('Delete * From 表名 Where 标识 = '+QuotedStr(edit1.Text));
ExecSQL;
end; //删除最后一行
with ADOQuery1 do
begin
close;
sql.Clear;
sql.Add('Select * From 表名');
Open;
Last;
str:=FieldByName('行号').AsString;
end;
with adoquery1 do
begin
Close;
Sql.Clear;
Sql.Add('Delete * From 表名 Where 行号 = '+QuotedStr(str));
ExecSQL;
end;
end;
1:删除最后1行内容
adotable1.last;
adotable1.delete; 2:删除全部内容
adotable1.DeleteRecords(arall);3:删除指定标示行(引索)行
if adotable1.locate('fieldname',fieldvalue,[]) then
adotable1.delete;
with ADOQuery1 do
begin
close;
sql.Clear;
sql.Add('Select * From 表名');
Open;
Last;
str:=FieldByName('行号').AsString; ---------------------FieldByName出错了(怎么回事?)
end;
with adoquery1 do
begin
Close;
Sql.Clear;
Sql.Add('Delete * From 表名 Where 行号 = '+QuotedStr(str));
ExecSQL;
end;
end;
with adoquery1 do
begin
Close;
Sql.Clear;
Sql.Add('Delete * From 表名'); //---------这里有问题 “提示:第1行'*'这语法错误”
ExecSQL;
end;