참고하세요



// oGrid : 그리드

// oTable : 테이블



with oGrid, oTable do

begin

if SelectedCount > 0 then

begin

for nI := 0 to SelectedCount-1 do

begin

GotoBookmark(pointer(SelectedRows[nI]));



Delete();

end;

end;

end;









궁금이 wrote:

>

> DBGrid에서 Multi-Select를 하여 MultiSelect된 자료를

>

> 모두 삭제하려고 합니다.

>

> DBGrid는 테이블과 연결된 상태거든요.

>

> 아시는 분의 성의이쓴 답변 부탁드리겠습니다.

>

> 감사합니다.~~

>

이성찬 wrote:

> 참고하세요

>

> // oGrid : 그리드

> // oTable : 테이블

>

> with oGrid, oTable do

> begin

> if SelectedCount > 0 then

> begin

> for nI := 0 to SelectedCount-1 do

> begin

> GotoBookmark(pointer(SelectedRows[nI]));

>

> Delete();

> end;

> end;

> end;

>

>

>

>

> 궁금이 wrote:

> >

> > DBGrid에서 Multi-Select를 하여 MultiSelect된 자료를

> >

> > 모두 삭제하려고 합니다.

> >

> > DBGrid는 테이블과 연결된 상태거든요.

> >

> > 아시는 분의 성의이쓴 답변 부탁드리겠습니다.

> >

> > 감사합니다.~~

> >



이게 간단

DBGrid1.SelectedRows.Count // 선택한 레코드 수

DBGrid1.SelectedRows.Clear // 선택한 레코드 해제

DBGrid1.SelectedRows.Delete // 선택한 레코드 삭제

^^;

제꺼는 루프돌리면서 특정 프로시져 처리하는걸 고쳐서 올렸습니다.

예를들면 특정 컬럼값 변경같은...

지우기만한다면 위의 코딩이 훨 간단하죠...



칠라기 wrote:

> 이성찬 wrote:

> > 참고하세요

> >

> > // oGrid : 그리드

> > // oTable : 테이블

> >

> > with oGrid, oTable do

> > begin

> > if SelectedCount > 0 then

> > begin

> > for nI := 0 to SelectedCount-1 do

> > begin

> > GotoBookmark(pointer(SelectedRows[nI]));

> >

> > Delete();

> > end;

> > end;

> > end;

> >

> >

> >

> >

> > 궁금이 wrote:

> > >

> > > DBGrid에서 Multi-Select를 하여 MultiSelect된 자료를

> > >

> > > 모두 삭제하려고 합니다.

> > >

> > > DBGrid는 테이블과 연결된 상태거든요.

> > >

> > > 아시는 분의 성의이쓴 답변 부탁드리겠습니다.

> > >

> > > 감사합니다.~~

> > >

>

> 이게 간단

> DBGrid1.SelectedRows.Count // 선택한 레코드 수

> DBGrid1.SelectedRows.Clear // 선택한 레코드 해제

> DBGrid1.SelectedRows.Delete // 선택한 레코드 삭제