我怎样才能选择一个字符串网格的多个单独的单元格？

我正在寻找一个字符串网格，它允许我在网格中的任何位置选择多个单元格，而不需要它们彼此相邻，例如按下CTRL并单击网格上的各个单元格。 或者如果有人知道如何用标准的Delphi TStringGrid做到这一点。

任何指针都会被感激地收到。

---

虽然这里有很多能干的人，但因为你没有得到任何答案，所以我想我会试一试。

我不知道有一种方法让组件为你做这件事。 但是，当您按住Control键单击一个单元格时，将调用事件OnSelectedCell。 （我刚刚测试过）。您可以将代码放入事件处理程序中，该处理程序将单元格的行和列添加到您保留所选行和列的列表中。 然后，在OnDrawCell事件中，突出显示该单元格：

procedure TForm1.StringGrid1DrawCell(    Sender: TObject;
                                         ACol: Integer;
                                         ARow: Integer;
                                         Rect: TRect;
                                         State: TGridDrawState);
begin
   if CellSelected( ARow, ACol) then  // you write CellSelected() to refer to the list you're keeping
     begin
       StringGrid1.Canvas.Brush.Color := clYellow;
       StringGrid1.Canvas.FillRect(Rect);
       StringGrid1.Canvas.TextOut(Rect.Left,Rect.Top,StringGrid1.Cells[ACol,ARow]);
     end;
end;

链接地址: http://www.djcxy.com/p/50625.html

上一篇: How can I select multiple individual cells of a string grid?

下一篇: OnKeyPress occurs before TStringGrid updates cell with new character