안녕하세요? 개박살입니다.

TUpdateSQL의 사용법을 잠시 말씀드리면,, (솔직히 안써봤음.. --; )

쿼리에서 적용된 내용을 각각의 원본 테이블에 Update할때 쓰인는 것이죠..

이걸 쓰려면 쿼리에 프로퍼티에 UpdateObject라는 곳있죠? 그곳에 UpdateSQL생성한걸 링크시키고

이벤트에서 OnUpdateRecord 라는 부분있죠? 그곳에서 처리하는겁니다.

원형은 다음과 같습니다.

void __fastcall TForm1::Query1UpdateRecord(TDataSet *DataSet,
     TUpdateKind UpdateKind, TUpdateAction &UpdateAction)

TUpdateSQL이 UpdateSQL1 이라고 할때,

void __fastcall TForm1::Query1UpdateRecord(TDataSet *DataSet,
     TUpdateKind UpdateKind, TUpdateAction &UpdateAction)
{
    switch(UpdateKind)  {
        case ukModified :
                UpdateSQL1->Query[UpdateKind].Text = Format("UPDATE Table1 SET Field1 = %d
                                                              Where Index1 = %d",
                                                DataSet->FieldByName("Field1")->AsInteger,
                                                DataSet->FieldByName("Index1")->AsInteger);
                UpdateSQL1->ExecSQL(UpdateKind);
                break;
        case ukInserted : break;
        case ukDeleted  : break;
    }

    UpdateAction = uaApplied;
}

이런식입니다.

온라인상이라서 틀린점이 있을껍니다. 도움말을 참고해서 작성해보세요~~ ^^;

그럼 참고하세요


몰라요 님이 쓰신 글 :
: TUpdateSQL 을 코딩으로 생성, 레코드 갱신하는 방법 좀 부탁합니다.
:
: 예제도 부탁해요..