dbgrid.selectindex>-1表示被选

解决方案 »

  1.   

    1、  DBGrid1.DataSource.DataSet.FieldByName('ad').AsString;
    0A2、在DBGrid连接的数据集的AfterScroll中写,取值方法如一—————————————————————————————————
    MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
                 毁誉由人,望天上云卷云舒,聚散任风。';
    if Not Assigned(I) then
      I := TI.Create(Nil);
    I.Maxim := MaximStr;
    I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”或者去掉';
    I.Desire := '加不加分随你';
    —————————————————————————————————
        
      

  2.   

    KeyDown事件yourvalue := DBGrid1.DataSource.DataSet.FieldByName('yourfield').Value