Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

intercettare tasti

0 views
Skip to first unread message

dr D'Aquila Francesco (Centro arte e cornici srl)

unread,
Jun 20, 2008, 9:56:11 AM6/20/08
to
ho bisogno di aiuto,
in una datadialog vi sono 28 single edit raggruppate secondo criteri logici.
Normalmente alla riga 28 (ultima) se premo tasto giu' il cursore salta alla
riga 1.
Vorrei che invece salisse alla riga 24 ( prima del raggruppamento). Ma solo
quando sono nella riga 28, alla riga 24, per esempio premendo tasto giu'
deve scendere alla riga 25, e cosě via.
Qualche suggerimento ?
Soprattutto esempi ??
Francesco D'Aquila
Grazie a tutti


Alessandro Antonangeli

unread,
Jun 20, 2008, 10:38:03 AM6/20/08
to
Se apri la finestra con l'editor e selezioni su control events
EditFocusChange,
ti crea automaticamente questo metodo

METHOD EditFocusChange(oEditFocusChangeEvent) CLASS NewWindow1
LOCAL oControl AS Control
LOCAL lGotFocus AS LOGIC
oControl := IIF(oEditFocusChangeEvent == NULL_OBJECT, NULL_OBJECT,
oEditFocusChangeEvent:Control)
lGotFocus := IIF(oEditFocusChangeEvent == NULL_OBJECT, FALSE,
oEditFocusChangeEvent:GotFocus)
SUPER:EditFocusChange(oEditFocusChangeEvent)
//Put your changes here
RETURN NIL

Sotto
//Put your changes here
scrivi:
if !lGotFocus .AND.oControl:NameSym == #NomeDelControlloRiga28
oDCNomeControlloRiga24:SetFocus()
endif

"dr D'Aquila Francesco (Centro arte e cornici srl)"
<Francesco...@virgilio.it> ha scritto nel messaggio
news:485bb6f3$0$41652$4faf...@reader4.news.tin.it...

dr D'Aquila Francesco (Centro arte e cornici srl)

unread,
Jun 20, 2008, 11:21:16 AM6/20/08
to
Il bello è che utilizzo già il tutto!!!
Comunque grazie
Francesco

"Alessandro Antonangeli" <alc...@alcati.RemoveThis.com> ha scritto nel
messaggio news:g3gfc6$bcg$1...@aioe.org...

>> giu' deve scendere alla riga 25, e così via.

0 new messages