Navigation:  bBrowser >

bBrowser:GetCellToPoint()

Diese Seite drucken    Vorherige SeiteZurück zum Anfang des KapitelsNächste Seite

Zweck

Ermittelt zu einem Punkt, die darunter liegende Datenzelle.

Klasse

bBrowser

Typ

Methode

Syntax

<oBrowser>:GetCellToPoint(<oPoint>) Æ oCell

Argumente

<oPoint>Punkt-Objekt, zu dem die Datenzelle ermittelt werden soll.
Datentyp:Point

Rückgabewert

oCellSpalten- und Zeilennummer der Datenzelle, die sich unter dem angegebenen Punkt befindet.
Datentyp:bCell

Beschreibung

bBrowser:GetCellToPoint() ermittelt zu einem Punkt, der durch eine X-/Y-Koordinate angegeben ist, die darunter liegende Datenzelle.

 

Die Koordinaten beziehen sich auf den Ursprung links oben innerhalb der ClientArea (CanvasArea) des Browsers.

Beispiele

Das folgende Beispiel fängt alle Mausbewegungen in einem Fenster ab und zeigt in der Caption des Fensters zur jeweiligen Position der Maus die darunter liegende Zelle (Spalte und Zeile) im Browser an.

 

METHOD Dispatch(oEvent) CLASS myDataWindow

       LOCAL oCell  AS bCell

       LOCAL oPoint AS Point

       LOCAL sPoint IS _winPoint

 

       // Mausbewegungen abfangen

       IF oEvent:Message=WM_SETCURSOR

               IF SELF:oDCbBrowser<>NULL_OBJECT

                       // Position der Maus ermitteln

                       // -> Die Position bezieht sich auf

                       // die linke obere Ecke des Desktop

                       GetCursorPos(@sPoint)

 

                       // Mausposition auf die linke obere

                       // Ecke des bBrowser abbilden

                       ScreenToClient(SELF:oDCbBrowser:Handle(), @sPoint)

                       oPoint := Point{sPoint.X, sPoint.Y}

 

                       // Zelle unter der Maus ermitteln

                       oCell := SELF:oDCBrowser:GetCellToPoint(oPoint)

 

                       // Zelle unter der Maus in der Caption

                       // des Fensters ausgeben

                       SELF:Caption := "Spalte: "+NTrim(oCell:Column);

                                                       +" - Zeile: "+NTrim(oCell:Row)

               ENDIF

       ENDIF

       RETURN SUPER:Dispatch(oEvent)        

Siehe auch

bBrowser:GetCaptionRect()

bBrowser:GetCellRect()

bBrowser:GetColumnRect()

bBrowser:GetColumnToPoint()

 


Page url: http://www.YOURSERVER.com/index.html?bbrowser_getcelltopoint.htm