|
That is why I tried the two-event MOUBTN command, letting the first button press move the display cursor to the selected field's location first, then double-clicking the mouse to light up F4. Now that you've said it, I bet that is the major reason for the big delay. Do you suppose? In <714D6BA7BBF1D0118A510060B0673BD397C3CD@az101-nt-msx2.avnet.com>, on 05/01/98 at 04:16 PM, "Popeil, Russ" <Russ.Popeil@avnet.com> said: >It is my understanding that when used with a Mouse the RTNCSRLOC will >return the following >From the DDS manual V4R1 >RTNCSRLOC({*WINDOW | *MOUSE} > &cursor-row &cursor-column > [&cursor-row2 > [&cursor-column2]]) >*MOUSE causes these parameters to >return the location of the cursor just before a two event mouse >definition is processed. > >I believe that with the mouse you cannot get the field name. Russ Popeil >- IBM Certified Specialist - RPG Programmer & AS/400 Sales Associate >Avnet Computer - Integrated Solutions. Bottom-Line Results. >Office: 516-677-9346, Fax: 516-677-0296, Beeper: 516-786-5846 eMail: >Russ.popeil@avnet.com >http://www.avnetcomputer.com >> -----Original Message----- >> From: boothm@ibm.net [SMTP:boothm@ibm.net] >> Sent: Friday, May 01, 1998 2:00 PM >> To: MIDRANGE-L@midrange.com >> Subject: Mouse button >> >> Here is code that almost works. Anyone have an idea what I am missing? >> >> A RTNCSRLOC(&RECID &FLDID) >> A MOUBTN(*ULP *ULD CF04) >> A RECID 10A H >> A FLDID 10A H >> >> (The goal is to tell an RPG program the field name that the mouse cursor >> is in when the mouse is double-clicked.) >> >> -- >> ----------------------------------------------------------- >> boothm@ibm.net >> ----------------------------------------------------------- >> >> +--- >> | This is the Midrange System Mailing List! >> | To submit a new message, send your mail to MIDRANGE-L@midrange.com. >> | To unsubscribe from this list send email to >> MIDRANGE-L-UNSUB@midrange.com. >> | Questions should be directed to the list owner/operator: >> david@midrange.com >> +--- >+--- >| This is the Midrange System Mailing List! >| To submit a new message, send your mail to MIDRANGE-L@midrange.com. >| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. >| Questions should be directed to the list owner/operator: david@midrange.com >+--- -- ----------------------------------------------------------- boothm@ibm.net ----------------------------------------------------------- +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.