function TStringGridEx.GetSelCells(ColIndex,RowIndex:integer):String; var i,SelRow:integer; begin SelRow := 0; for i:=1 to RowCount-1 do begin if RowSelected[I] then inc(SelRow); if SelRow = RowIndex then Break; end; Result := FSelRows[i].Strings[ColIndex]; end;
function TStringGridEx.GetSelCnt:Integer; var i,R:integer; begin R:=0; for i:=0 to Rowcount-1 do if RowSelected[i] then Inc(R); Result := R; end;
注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！ 本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] 
