DBGrid를 2개 써서 사용하는데,

상위 DBGrid에서 MultiSelect를 해서 하위 DBGid에 삽입을 하는데,

MultiSelect한 값을 Duplication을 check해서 삽입을 하려고 합니다.



Locate('STRING1', STRING1, loCaseInsensitive);

를 이용해서 하는데, Record하나 선택시에는 Check가 되는데,

MultiSelect시에는 Check가 되지 않습니다.)





좋은 방법 좀 가르쳐 주세요...

(저는 턱시도 DataSet를 사용하고 있고, 쓰리티어 환경입니다.

현재는 DuP Check가 서버에서만 되고 있어, Client에서

Dup Check를 하려고 합니다.)



현재 사용한 소스>>



If CurrentRowSelected = True Then

Begin

Str1 := tdsAplcSTRING1.Value; //키값1

Str2 := tdsAplcSTRING2.Value; // 2

Str3 := tdsAplcSTRING3.Value; // 3



If (tdsMaster.Locate('STRING1', Str1, loCaseInsensitive) = False) AND

(tdsMaster.Locate('STRING2', Str2, loCaseInsensitive) = False) AND

(tdsMaster.Locate('STRING6', Str3, loCaseInsensitive) = False) Then

Begin

dbgTelcv.DataSource.DataSet.Bookmark := Items[i];

tdsMaster.Append;

tdsMaster.Post;

End

Else

Begin

GetMsg('BL00190', 'RECALL', mtWarning); //중복메시지출력

Abort;

End;

End;

dbgTelcv.DataSource.DataSet.FindNext;

End;