J
jh922
Unregistered / Unconfirmed
GUEST, unregistred user!
begin
Query1.delete;//先删除这一行
Form_Input.Edit1.Text:=Form_main.Query1.FieldByName('编号').AsString;
//把表中的数据显示在输入窗口中
//问题就出在这,为什么输入窗口中没有我要显示的数据呢?请教,这是怎么回事?
//那位还有更好的方法吗?用update 可以吗?
if Form_input.ShowModal=mrok then begin//输入数据
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('Insert into "User.DB" 编号 Values :编号');
Query1.Params[0].AsString:=Form_Input.Edit1.Text;
Query1.ExecSQL;
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('Select * from "User.db"');
Query1.Open;
end;
Query1.delete;//先删除这一行
Form_Input.Edit1.Text:=Form_main.Query1.FieldByName('编号').AsString;
//把表中的数据显示在输入窗口中
//问题就出在这,为什么输入窗口中没有我要显示的数据呢?请教,这是怎么回事?
//那位还有更好的方法吗?用update 可以吗?
if Form_input.ShowModal=mrok then begin//输入数据
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('Insert into "User.DB" 编号 Values :编号');
Query1.Params[0].AsString:=Form_Input.Edit1.Text;
Query1.ExecSQL;
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('Select * from "User.db"');
Query1.Open;
end;