C/S프로그램중입니다 자료를 수정시 DB를 재오픈하였더니 엄청난
자료때문에 속도가 많이 떨어 집니다 어떻하면 자료를 재오픈하지
않고 갱신된 자료를 바로 모두가 볼수 있을까요 ???
procedure TForm2.EditClick(Sender: TObject);
begin
DM1.Database1.StartTransaction;
try
with DM1.Query1 do
begin
Close;
SQL.Clear;
SQL.Add('UPDATE Myham');
SQL.Add('SET Number = :Number, Name = :name');
SQL.Add('WHERE Number = :Number');
ParamByName('Number').AsInteger := StrToInt(Edit1.Text);
ParamByName('Name').AsString := Edit2.Text;
ExecSQL;
with DM1.Query1 do
begin
Close;
SQL.Clear;
SQL.Add('SELECT * FROM Myham');
Open; //요기서 시간이 많이 소요됨
//수정자료를 보이게함
end;
DM1.Database1.Commit;
except
DM1.Database1.Rollback;
Application.MessageBox(' 자료 저장에 이상이 발생하였습니다! ','저장오류',
mb_ICONINFORMATION);
end;
end;