Witam,

SG - TStringGrid

mam SG. I chcę tak:
1 - po kliknięciu na niego (SGClick) usuwam goEditing z opcji,
2 - po puszczeniu myszki (SGMouseUp) wstawiam goEditing do opcji,

No i niby powinno działać tak, że po kliknięciu jak ruszam myszką to będzie mi zaznaczać komórki, a jak puszczę myszkę, to mogę edytować komórki. Ale nie działa. Robiłem to na radiobuttonach, ale jest to strasznie niewygodne. Trochę lepiej jest, gdy na DblClicku wchodzę w tryb edycji. Ale i tak OnClick musi się wykonać 2x, żeby SG załapał nowe opcje :/

Kod jest naprawdę bardzo prosty:

void __fastcall TFRoot::SGClick(TObject *)
{
	SG->Options = SG->Options >> goEditing;
}
//---------------------------------------------------------------------------

void __fastcall TFRoot::SGMouseUp(TObject *, TMouseButton ,
	  TShiftState , int , int )
{
	SG->Options = SG->Options << goEditing;
}
//---------------------------------------------------------------------------

Żadnych innych zdarzeń na SG nie ma.

Czytałem forum. Np.:
http://4programmers.net/Forum/292791?h=tstringgrid%20options#id292791