Q&A

  • (급)dbgrid에서 현재 선택한 행번호를 알려면.....
부탁합니다..

dbgrid에서 현재 선택한 행번호를 알려면 어찌해야 하는지좀 알려주셔요....

1  COMMENTS
  • Profile
    최석기 1999.07.02 22:18
    백운익 께서 말씀하시기를...

    > 부탁합니다..

    > dbgrid에서 현재 선택한 행번호를 알려면 어찌해야 하는지좀 알려주셔요....



    다음은 현재 선택된 셀의 채 Col과 Row를 구하는 소스입니다.



    procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;

    Field: TField; State: TGridDrawState);

    var

    RowHeight: Integer;

    begin

    if gdFocused in State then

    begin

    RowHeight := Rect.Bottom - Rect.Top;

    Row := (Rect.Top div RowHeight) + 1;

    Col := Field.Index;

    end;



    end;



    procedure TForm1.Button1Click(Sender: TObject);

    begin

    ShowMessage(IntToStr(Row) + #13 + IntToStr(Col));

    end;