void __fastcall TForm1::StringGrid1DblClick(TObject *Sender) { StringGrid1->Cells[StringGrid1->MouseCoord(P.x, P.y).X][StringGrid1->MouseCoord(P.x, P.y).X] = ""; }