realbasic-nug
[Top] [All Lists]

Re: Contextual click on listbox header

To: REALbasic NUG <realbasic-nug@lists.realsoftware.com>
Subject: Re: Contextual click on listbox header
From: Christian Dorn <realbasic@online.de>
Date: Fri, 27 Feb 2009 15:37:34 +0100
Authentication-results: mx.google.com; spf=neutral (google.com: 74.124.194.228 is neither permitted nor denied by best guess record for domain of realbasic-nug-bounces@lists.realsoftware.com) smtp.mail=realbasic-nug-bounces@lists.realsoftware.com
Delivered-to: listarchive@realsoftware.com
In-reply-to: <68B26588-48EE-4480-9305-2AB7D0692EA6@stretchedout.com>
References: <E1D852E9-A6DB-421A-9438-85A69E61256C@gsco.de> <F2EF08E6-1F4C-4B93-BE3C-BFDF618F08D2@online.de> <68B26588-48EE-4480-9305-2AB7D0692EA6@stretchedout.com>
Reply-to: REALbasic NUG <realbasic-nug@lists.realsoftware.com>
Sender: realbasic-nug-bounces@lists.realsoftware.com

Am 27.02.2009 um 15:18 schrieb Greg O'Lone:

Interestingly, if you try to do this:

dim col as integer
col = me.ColumnFromXY(x,y)

in the MouseDown event, you get -1 I'd expect it to be able to figure out which column you clicked....

Yes, I found this, too. But you can get the right column by adding up the WidthActual properties of the columns:

  dim column, w, count as Integer
  column = -1
  count = me.ColumnCount-1

  for i as Integer = 0 to count
    w = w + me.Column(i).WidthActual
    if w >= x then
      column = i
      exit
    end if
  next i


Gruß
Christian

----------------------------------------
Christian Dorn
realbasic {a} online.de

REALbasic 2008.5-1 Pro
iMac 3.06 GHz Intel Core 2 Duo, 4 GB RAM
PowerMac G5 2x2GHz, 1.5 GB RAM
Mac OS X 10.5.6
----------------------------------------







_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>


<Prev in Thread] Current Thread [Next in Thread>