realbasic-nug.it
[Top] [All Lists]

Re: ListBox and cont. menu

To: REALbasic NUG Italian <realbasic-nug dot it at lists dot realsoftware dot com>
Subject: Re: ListBox and cont. menu
From: Lucio Liberi <lucioing at tin dot it>
Date: Wed, 10 Jan 2007 10:12:33 +0100
Delivered-to: listarchive at realsoftware dot com
Delivered-to: realbasic-nug dot it at lists dot realsoftware dot com
References: <EF3B2BD3-035E-451B-A932-33FC5B792E96 at tin dot it> <3071448E-EDC3-4C5E-ADF7-9C7BE5754A1C at tin dot it> <6D64C4E0-1D4F-4A86-921D-E05D4B0CB732 at cantoberon dot it>
Naturalmente... io lo sapevo... Volevo vedere se lo sapevate voi!!!

G R A N D E      G I U L I O !!!!!!!!!!!

Funziona B E N I S S I M O. Non l'avevo MAI usata prima questa funzione. In effetti e' estremamente utile...
Grazie, grazie ancora!

Lucio


Il giorno 10/gen/07, alle ore 10:01, Giulio ha scritto:

Ciao Lucio,

c'e' una funzione, RowFromXY( X, Y ), che ti ritorna la riga della cella ad un certo x e y, oppure -1 se x e y non coincidono con nessuna riga.

quindi ti puoi testare entrambi i casi nel MOUSE DOWN

If IsContextualClick Then
if RowFromXY( X, Y ) = -1 then // hai cliccato fuori da una riga
          Dim m as MenuItem
m=MenuBar2.PopUp <-------- menu bar 2, quello con solo ADD ROW
      else
          Dim m as MenuItem
m=MenuBar3.Popup <--------- menu bar 3, quello con EDIT e DELET
       end if
End if

spero serva,

ciao

     Giulio


Il giorno 10/gen/07, alle ore 09:34, Lucio Liberi ha scritto:

Eccomi di nuovo qui...
Qualche cosa sono riuscito a farla. Ho creato due menubar con menu che contengono:
1) Add row

e l'altro

1) Edit row
2) ----------------
3) Delete row

Funziona molto bene, ma ho un problema... Ho messo il controllo del click 'destra mouse' nel MOUSE DOWN della list box:

  If IsContextualClick Then
    Dim m as MenuItem
m=MenuBar2.PopUp <-------- menu bar 2, quello con solo ADD ROW
  End if

e funziona benissimo. Infatti, se faccio destra click sulla parte vuota della listbox, mi si apre il menu' con Add row. A quel punto effettuo l'aggiunta di una riga con tutti i dati... Bene. Ma quando faccio la stessa cosa su una riga esistente,(naturalmente dentro CELL CLICK)

    If IsContextualClick Then
      Dim m as MenuItem
m=MenuBar3.Popup <--------- menu bar 3, quello con EDIT e DELETE
    End if

prima mi appare il menu Add row e POI, solo in seconda battuta, il menu con Edit row ecc. Questo mi sembra anche ovvio, perche', in fondo, se faccio click su una cella, ho anche fatto un 'mouse down'...

Ecco, non riesco ad uscire da questo loooooop.
Mi date una mano?
Grazie

Lucio


Il giorno 09/gen/07, alle ore 16:06, Lucio Liberi ha scritto:

Ciao a tutti e buon anno!
Vorrei gestire i dati di una listbox attraverso i menu contestuali... insomma, con il tasto destro del mouse...
In particolare:
1) facendo click su una parte vuota della list box il menu dovrebbe dare un 'Add item'
2) facendo click su una riga esistente 'Edit item' e 'Delete item'

Spero di essere stato chiaro...
Tutto questo, naturalmente, lo so fare con dei classici bottoni, ma con i menu contestuali, non l'ho mai fatto...

Grazie

Lucio





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