本帖最后由 junkli 于 2010-12-26 22:53:28 编辑

解决方案 »

  1.   

    procedure TForm1.AdvStringGrid2ClickCell(Sender: TObject; ARow, ACol: Integer);
    begin
     //用个变量记录下ARow, ACol 
    end;
      

  2.   

    用的什么数据集?
    adoquery1.RecNo;这个是选中行的行号。
      

  3.   

    可以试试
    DBGrid1.SelectField.DataSet.RecNo 和 DBGrid1.SelectField.FieldNo 
    来确定下行列
      

  4.   

    procedure TForm1.DBGrid1CellClick(Column: TColumn);
    begin
    Edit1.Text:=ADOQuery1.fieldbyname(column.FieldName).asstring;
    showmessage(ADOQuery1.fieldbyname(column.FieldName).asstring);
    end;
    仅供参考
      

  5.   

    晕死,贴错了。抱歉噶
    procedure TForm1.DBGrid1CellClick(Column: TColumn);
    begin
    showmessage(inttostr(table1.recno));
    end;