在edit 输入数据后 使用SQL 语句更新数据库表
数据来自于edit 输入的数据
格式大概是
Query.Close;
Query.sql.clear;
Query.SQL.add('update person set XH=edit1.text'); 这里边要写 不会了 请教了
Query.execsql
数据来自于edit 输入的数据
格式大概是
Query.Close;
Query.sql.clear;
Query.SQL.add('update person set XH=edit1.text'); 这里边要写 不会了 请教了
Query.execsql
s1 = 'update person set XH=''%s''';
var
sql: string;
begin
sql := Format(s1, [edit1.text]);
Query.Close;
Query.SQL.Clear;
Query.SQL.Add(sql);
try
Query.ExecSQL;
except
ShowMessage('数据库操作失败,请检查数据库文件!');
end;
end;
这个刚接触
要怎么加where 条件呢
Query.sql.clear;
Query.SQL.add('update person set XH='''+trim(edit1.text)+''' where 字段名=条件'); Query.execsql
这样应该可以吧!
一般更新某一行要这样