Q&A

  • 그리드를 클릭했을때 값을 보여주고 싶습니다..
AdvStringGrid가 있습니다.
거기에 Cells[4,i]에서 Cells[15,i] 의 셀들을 클릭했을때
A에서 L이라는 스트링 타입 변수에 1부터 12까지의 값을 넣어주고 싶습니다..
어떻해 해야할지 여러모로 생각을 해봐도 막상 해보니 안되네요..- -;;
고수님들 도와주세요..~~
2  COMMENTS
  • Profile
    LuckyBoy 2002.12.20 21:28
    질문의 내용을 보면 무슨일을 하시려는지 정확히 판단하기는 어렵습니다.
    그래서 나름대로 판단하기를 4이상의 Col을 클릭했을때 1부터 12까지의
    값을 넣어주고 싶다는 얘기로 판단하겠습니다..

    먼저 AdvStringGrid의 ClickCell Event에 다음과 같이 코딩을 해주세요..
    procedure TForm1.AdvStringGrid1ClickCell(Sender: TObject; Arow,
      Acol: Integer);
    begin
      //일단 Row가 0인경우는 타이틀을 클릭하므로 제외시키고
      //Col은 4부터 이므로 3이하는 제외시킴니다..
      if (ARow > 0) and (ACol > 3) then
      begin
        //Col이 4인경우에 1이들어가고 5면 2 이런식으로 들어가므로
        //들어가는 값은 Col 값에서 3을 빼면 되겠지요..
        AdvStringGrid1.Cells[AdvStringGrid1.Col, AdvStringGrid1.Row] := IntToStr(ACol - 3);
      end;
    end;

    정확히 질문을 판단하지 못해서 이정도밖에 답변을 못드리겠습니다..
    그럼 즐프하세요..
  • Profile
    왕초보 2002.12.21 00:58
    냉무~