Выделение элемента TStringGrid перед появлением Popup меню.
Может можно как-то послать Right Click перед в время onMouseUp?
Вообще-то, в OnContextPopup можно вызвать TCustomDrawGrid.MouseToCell, передав ему MousePos из параметров обработчика OnContextPopup.
У самого Дельфи в нерабочем состоянии, поэтому не проверял.
Код:
void __fastcall TForm1::StringGrid1ContextPopup(TObject *Sender,
TPoint &MousePos, bool &Handled)
{
int Col,Row;
((TStringGrid *)Sender)->MouseToCell(MousePos.x,MousePos.y,Col,Row);
((TStringGrid *)Sender)->Col = Col;
((TStringGrid *)Sender)->Row = Row;
}
TPoint &MousePos, bool &Handled)
{
int Col,Row;
((TStringGrid *)Sender)->MouseToCell(MousePos.x,MousePos.y,Col,Row);
((TStringGrid *)Sender)->Col = Col;
((TStringGrid *)Sender)->Row = Row;
}
Спасибо. Я что то не посмотрел в onContextPopup