Código Delphi [-] procedure TForm1.Button1Click(Sender: TObject); begin with StringGrid1.Selection do ShowMessage(Format('Desde, col: %d row: %d',[Left,Top])+#10+ Format('Hasta, col: %d row: %d',[Right,Bottom])); end;
procedure TForm1.Button1Click(Sender: TObject); begin with StringGrid1.Selection do ShowMessage(Format('Desde, col: %d row: %d',[Left,Top])+#10+ Format('Hasta, col: %d row: %d',[Right,Bottom])); end;