Category: Components
Title: Check if a Stringgrid cell is selected
Date added: 15.03.2006
Hits: 17271


function IsCellSelected(StringGrid: TStringGrid; X, Y: Longint): Boolean;
begin
  Result := False;
  try
    if (X >= StringGrid.Selection.Left) and (X <= StringGrid.Selection.Right) and
      (Y >= StringGrid.Selection.Top) and (Y <= StringGrid.Selection.Bottom) then
      Result := True;
  except
  end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  if IsCellSelected(stringgrid1, 2, 2) then
    ShowMessage('Cell (2,2) is selected.');
end;

1. How to delete all selected items of a Listbox? (10740 Hits)

2. How to change the default cell selection color in a TStringGrid? (7886 Hits)

3. How to set the tabulator width in a TMemo? (3563 Hits)

4. How to detect if the scrollbars of a TStringGrid are visible? (7726 Hits)

5. How to create Internet link in Tlabel? (7437 Hits)

For any problems or recommendations about Delphi Tricks site, please

feel free to contact us on that e-mail: support@delphitricks.com.
If you want to advertise on the site use that e-mail: advertise@delphitricks.com.

You can freely use or modify these Delphi source codes for non-commercial use. We are not responsible of any damages that can be caused by the utilisation of that source codes.