C++ Builder Snippets  


Die Maus-Position über dem TStringGrid in "Tabellenkoordinaten" ermitteln:
 
//---------------------------------------------------------------------------
// Ermitteln der Maus-Position über dem TStringGrid in "Tabellenkoordinaten"
//---------------------------------------------------------------------------
// - Die Funktion liefert eine TPoint-Struktur zurück, in der die X-Koordinate 
//   der Spaltennummer und die Y-Koordinate der Zeilennummer entspricht.
//
// - MouseToGrid() kann eingesetzt werden wenn die Selection-Eigenschaft 
//   der Tabelle für die Auswertung der Mouse-Position nicht verwendet
//   werden kann: z.B. beim (Doppel-) Klick auf die 'Fixed Cells'
//---------------------------------------------------------------------------
TPoint MouseToGrid(TStringGrid* pGrid)
{
  int ACol, ARow; TPoint plPoint;
  ::GetCursorPos(&plPoint);
  plPoint = pGrid -> ScreenToClient(plPoint);
  pGrid -> MouseToCell(plPoint.x, plPoint.y, ACol, ARow);
  plPoint.x = ACol;
  plPoint.y = ARow;
  return plPoint;
}




© '99-2001 by S. Kreutzmann