안녕하세요...



작업을 진행중인데... 어려움이 있어 여러분께 도움을 청하려고 합니다.



체크박스를 생성해서 DBGrid에 위치를 해놓고, 체크된 여부를 확인하고 그에 해당되는



그리드의 Row 데이타값을 읽어서 퀵리포트에 뿌려주려 합니다.



분명 이에 해당되는 작업을 하셨던 많은 분들이 계실걸로 믿습니다.. 그래서 이렇게



도움을 청하는데요... 아시는 분이 계시면 도와주시기 바랍니다... 그럼..



아래 소스는 그리드 안에 체크박스를 생성하는 부분의 소스입니다.



procedure TVTP_AP010F.Dbg_AsmJisiDrawColumnCell(Sender: TObject;

const Rect: TRect; DataCol: Integer; Column: TColumn;

State: TGridDrawState);

begin

if DataCol = 1 then

begin

CheckBox := TCheckBox.Create(Self) ;

if Ckb_All.Checked then

CheckBox.Checked := True

else

CheckBox.Checked := False;

CheckBox.Left := Dbg_AsmJisi.Left + Rect.Left + 570 ;

CheckBox.Width := 15 ;

CheckBox.Top := Dbg_AsmJisi.Top + Rect.Top + 77;

CheckBox.Color := clWindow ;

CheckBox.Parent := Self ;

end;

end;