Var
ChkStatus : Boolean
Begin
With AdvStringGrid Do Begin For ii := 0 To RowCount - 1 Do Begin GetCheckBoxState(0, ii+1, ChkStatus);
If ChkStatus Then Begin .
. 처리할 문장...
. End; End; End;
end;
이렇게 하면 됩니다...
GetCheckBoxState에서 ChkStatus의 값을 넘겨주는데 그 값으로 판단하여 처리하면 됩니다...
댓글 없음:
댓글 쓰기