Alastair,

If I am understanding correctly,

Form 1 has the enhanced speed button
Form 2 has the field you wish captured

In Form2 utilize a component ID such as
Form2ComponentID.
In On Exit EEP of the componet place
GETPROPERTY Form2ComponentID TEXTVALUE vForm2ComponentID

In Form 1 place a componentID on the field to receive the data.
In the enhanced speed button you should have something like
EDIT USING Form2
PROPERTY Form1ComponentID TEXTVALUE .vForm2ComponentID
RETURN

Jan
 


-----Original Message-----
From: "Alastair Burr" <[email protected]>
To: [email protected] (RBASE-L Mailing List)
Date: Tue, 21 Jul 2009 18:36:57 +0100
Subject: [RBASE-L] - I'm not understanding a Form Property properly


Hi all,
 
I'm probably trying to be too clever for my own good:
 
A bit of background first - what I want to do is to capture the identity of 
a field on a form, then run another form by clicking on an enhanced speed 
button (no focus), insert data from second form to the field on first form 
(this works), then call the second form again.
 
What's happening is that the identity of the field is being changed when I 
go back to first form to that of the last field on the second form and I 
can't see why.
 
To try and force the identity to be re-captured correctly I have added the 
following:
 
PROPERTY 'Images_SR|RBASE_FORM' SET_FOCUS 'TRUE'  which gives an error that 
the "component [name]  not found in current form";
PROPERTY 'IDE_ImageTitle' SET_FOCUS 'TRUE' - which gives no error;
and also tried:
 
PROPERTY 'Images_SR|IDE_ImageTitle' SET_FOCUS 'TRUE' - which also gives an 
error that the "component [name]  not found in current form";
 
In all cases the cursor appears to be in the correct field on the correct 
form on returning to the first form.
 
This is the code that captures the form & field data and the &Action gets 
the right value the first time but not on any subsequent attempts because 
vColID is then wrong:
 
SET VAR vColID TEXT = .RBTI_FORM_COMPID
SET VAR vFormID TEXT = .RBTI_FORM_FORMNAME
SET VAR vAction TEXT = ('GETPROPERTY' & .vColID & 'TEXTVALUE vCopyName')
&vAction

and this is my attempt to force it:
 
SET VAR vAction TEXT = +
('PROPERTY' & .vQuotes + .vFormID + '|RBASE_FORM' + .vQuotes & 'SET_FOCUS 
''TRUE'' ')
&vAction
SET VAR vAction TEXT = +
('PROPERTY' & .vQuotes + .vColID + .vQuotes & 'SET_FOCUS ''TRUE'' ')
&vAction
 
I must be missing something obvious but it's eluding me so any hints 
gratefully accepted,
Regards, 
Alastair 
 
----------------------------
Alastair Burr
St. Albans, UK.
[email protected]
-----------------------------
 

Reply via email to