Jim,

Sorry. Was out the rest of Saturday. Had to go play Army for a while.
Funny when I got home he was billing me for my services (IRS).


I don't use db-grids much so this is untested. 


Place your three bit buttons with your componentids
BitButton1
BitButton2
BitButton3


Place your dbgrid with componentid
DBGrid


This is the eep (probably in the “OnEntryIntoDBGridColumn”)


SET VAR vIndex TEXT = NULL
--get the column
GETPROPERTY DBGrid SelectedIndex vIndex
--disable all the buttons
PROPERTY BitButton% ENABLED 'FALSE' --the % is your database MANY setting
--enable the selected column button
SWITCH (.vIndex)
     CASE 'selection1'
          PROPERTY BitButton1 ENABLED 'TRUE'
     BREAK
     CASE 'selection2'
          PROPERTY BitButton2 ENABLED 'TRUE'
     BREAK
     CASE 'selection3'
          PROPERTY BitButton3 ENABLED 'TRUE'
     BREAK
ENDSW


Hope this helps


Jan

 


-----Original Message-----
From: "Jim Belisle" <[email protected]>
To: [email protected] (RBASE-L Mailing List)
Date: Sat, 26 Jun 2010 10:37:23 -0500
Subject: [RBASE-L] - Re: RBTI properties


Jan,
 
I would like to utilize more of the features of the DBGRID.
Here is what I want to accomplish.
I would like to have three bit buttons to use based on the column the cursor 
is in.
When they click in the proper column, then they can use the button 
associated with the field.
 
I have Three columns (Shipstate, Order#, Customer#) in this grid. 
The component ID is Comp_DCLup for the grid.
I also have a var vColumnname that gives me the col name where the cursor is 
located.
 
F you can point me in any direction, I would appreciate it.
BTW, I have looked at the RRBYW14 examples and that is what got me 
interested in using the DBGRID.
 
Jim
 
 



From: [email protected] [mailto:[email protected]] On Behalf Of jan johansen
Sent: Saturday, June 26, 2010 8:44 AM
To: RBASE-L Mailing List
Subject: [RBASE-L] - Re: RBTI properties
 
Jim,
 
Without knowing all the details of your dbgrid, it looked like you were not 
leaving the column.
So the first value of vCnum is what you have until you leave the column and 
come back.
 
Glad I could help.
 
Jan
 

 
-----Original Message-----
From: "Jim Belisle" <[email protected]>
To: [email protected] (RBASE-L Mailing List)
Date: Sat, 26 Jun 2010 08:26:30 -0500
Subject: [RBASE-L] - Re: RBTI properties
Jan, 
  
Once again I turn the simple into the complex.
I try to use new variables (in this case the RBTI ones) I forget the simple 
ones. 
Thanks again. The grid works perfectly.
  
Jim 
  



From: [email protected] [mailto:[email protected]] On Behalf Of jan johansen
Sent: Saturday, June 26, 2010 8:17 AM
To: RBASE-L Mailing List
Subject: [RBASE-L] - Re: RBTI properties
 
Jim,
 
Make vCnum a Form Variable that is calculated on the row.
 
Jan
 

 
-----Original Message-----
From: "Jim Belisle" <[email protected]>
To: [email protected] (RBASE-L Mailing List)
Date: Sat, 26 Jun 2010 08:10:30 -0500
Subject: [RBASE-L] - RBTI properties
I Have a DBGRID with the following EEP in the on entry into DBGRID col.
 
SET VAR vCnum = NULL 
GETPROPERTY Comp_DCLup CURRENTCOLUMNNAME vColumnname
RECALC VARIABLES 
-- get order number value so I can bring up order form for that number.
SET VAR vCnum = (RBTI_FORM_COLVALUE) 
RETURN
 
The var vCnum then is used in a bit button to bring up an order based on 
that var. 
The bit button EEP is as follows: 
SET VAR vformmode = 'EDIT' 
EDIT USING kayparkorderbrowse WHERE control# = .vcnum
PROPERTY Comp_DCLup SET_FOCUS 'TRUE' 
RECALC VAR 
RETURN
 
When I first go into the DBGRID then click the Bit button, the order form 
comes up as it should. 
If after getting out of the order form I then click on a different order 
number within the DBGRID (same column) and hit the bit button, it just 
brings up the order I looked at previously. 
If however I click on a different column within the DBGRID, click on the 
Order number column, then the bit button, I get the new Order to come up in 
the form.
 
I am not quite sure what code I need to use in the bit button to reset the 
var vCnum without having to click a different col then the order col.
 
Jim
 
 

Reply via email to