Q&A

  • insert 한 결과가 적용되지 않습니다.
안녕하시와요...

오늘 질문은 Query 컴포넌트를 이용해서 insert를 하였습니다.

그런데 그 폼이 죽어야지만 insert 한 결과가 DB에 반영되는 것 같습니다.

물론 insert 한 후에 다시 조회를 하면 insert 한 것은 조회리스트에서는 반영이 되는것 같은데 실제 DB에는 그 폼이 죽어야만 반영이 됩니다.

Query1.commit; --> 이런것이 없는것 같아요...



Query 컴포넌트로는 방법이 없나요...???

소스입니다. DB는 오라클이구요...

꼭 좀 갈켜주세요...

그냥 UpdateSQL 컴포넌트루 하라는 성의없는 대답은 하지 마시구요...



ex)

with Query1 do

begin

close;

SQL.Add('insert into abc');

SQL.Add('(id, irum)'

SQL.Add('values');

SQL.Add('(:p_id, :p_irum)');



For i := 0 to count -1 do

begin

ParamByName('p_id').AsString := arr_id[i];

ParamByName('p_irum').AsString := gs_irum;

ExecSQL;

end;



end;

1  COMMENTS
  • Profile
    방문현 2001.05.22 04:18
    궁그미 wrote:

    > 안녕하시와요...

    > 오늘 질문은 Query 컴포넌트를 이용해서 insert를 하였습니다.

    > 그런데 그 폼이 죽어야지만 insert 한 결과가 DB에 반영되는 것 같습니다.

    > 물론 insert 한 후에 다시 조회를 하면 insert 한 것은 조회리스트에서는 반영이 되는것 같은데 실제 DB에는 그 폼이 죽어야만 반영이 됩니다.

    > Query1.commit; --> 이런것이 없는것 같아요...

    >

    > Query 컴포넌트로는 방법이 없나요...???

    > 소스입니다. DB는 오라클이구요...

    > 꼭 좀 갈켜주세요...

    > 그냥 UpdateSQL 컴포넌트루 하라는 성의없는 대답은 하지 마시구요...

    >

    > ex)

    > with Query1 do

    > begin

    > close;

    > SQL.Add('insert into abc');

    > SQL.Add('(id, irum)'

    > SQL.Add('values');

    > SQL.Add('(:p_id, :p_irum)');

    >

    > For i := 0 to count -1 do

    > begin

    > ParamByName('p_id').AsString := arr_id[i];

    > ParamByName('p_irum').AsString := gs_irum;

    > ExecSQL;

    > end;

    > ///////여기에서 Query1.Post; 나 Query1.ApplyUpdates;로 해주면 됩니다.

    > end;