Я могу легко дважды щелкнуть по моей сетке строк и получить содержимое ячейки с помощью приложения VCL. Как я могу сделать это с помощью FMX? - PullRequest
0 голосов
/ 08 ноября 2018

Я использую этот код, чтобы иметь возможность щелкать по определенной ячейке в моей сетке и выводить строку в этой ячейке. Он отлично работает в моем приложении VCL.

procedure TForm1.StringGridBindSourceDB1CellDblClick(const Column: TColumn;
  const Row: Integer);


var
  Coordinates:TGridCoord;
  x:integer;
  Pt:TPoint;
  html_body:string;
  ClickCol:Integer;
  ClickRow:Integer;
begin
  Pt := grid.ScreenToClient(mouse.CursorPos);
  Coordinates := grid.MouseCoord(Pt.X, Pt.Y);

  ClickCol := Coordinates.X;
  ClickRow := Coordinates.Y;
  html_body := grid.Cells[ClickCol, ClickRow];
end;

Однако, когда я пытаюсь достичь того же результата в приложении firemonkey, я не могу использовать "TGridCood", "ScreenToClient," или "mouse.CursorPos"

"grid" - это TStringGrid

...