Question

delphi7 如何只修改一个信息

例如：我想修改位置：5 and 工作时间的列（值为23） 请问代码该怎么写？
PS：Delphi7.0，SQL Server2005

Answer 1

if adotable.Locate('位置', '5', [loCaseInsensitive]) then
begin
adotable.Edit;
adotable.FieldByName('工作时间').AsString := edit1.Text;
adotable.Post;
end;

Answer 2

if adotable.Locate('位置', '5', [loCaseInsensitive]) then
begin
adotable.Edit;
adotable.FieldByName('工作时间').AsString := edit1.Text;
adotable.Post;
end;

追问

我每个字段都会设置一个按钮，能不能不用IF语句

追答

不能不用IF，这一行是定位到你所要修改的位置上，如果不调用locate方法，你修改的可能是第一条数据。

如果要更改多个字段：
adotable.FieldByName('工作时间').AsString := edit1.Text;
adotable.FieldByName('工作完了').AsString := edit2.Text;

不能不用IF，这一行是定位到你所要修改的位置上，如果不调用locate方法，你修改的可能是第一条数据。

如果要更改多个字段：
adotable.FieldByName('工作时间').AsString := edit1.Text;
adotable.FieldByName('工作完了').AsString := edit2.Text;

Answer 3

不建议新人 学delphi。。。