FiveTech Software tech support forums

declará como un array los get y set
local oGets:= array(5)
local oSays:= array(5)
local o

redefine get oGets[1]....
redefine say oSay[1]...

El metodo para ocular el get es hide() lo mismo que para los say

for each o in oGets
o:hide()
next
...

Dear Dutch, How did you solved it ? I need to define FONT for the message. @ nBottom-50, 0 SAY oSays PROMPT space(1000) OF oDlg SIZE nRight+1, 50 PIXEL COLOR CLR_WHITE, nRGB( 245, 245, 245 ) oSays:lTransparent := .F. Function MsgYesNo( cText, cTitle, lLeftAlign )local ...

... ha sido cambiada a: NextData(aoSay, alBorder) llamandola asi: NextData({oSay1,oSay2,oSay3},{.T.,.f.,.f.}) // Array con tantos elementos como oSays requeridos. La .t.indica que se usa BORDER, la .f. indica sin borde. Se agregó la function RefreshData(aoSay, alBorder) llamandola con los mismos ...

Tried your solution although their are all objects. The problem is still there. Should be something with FWH since if I only update part of the oSays the problem disappears!    IF lUpdate  //this way the problem disappears      FOR i:=16 TO 23  //was 14 to 23. ...

I am assuming this var is an array: oSays[1]

This is not really correct Hungarian syntax. An array datatype should be prefixed with an "a" regardless of what datatype the array contains (in this case an object). So it should be aSays instead. It does contain oSay objects.

Regards,
James

It works perfectly if you define groupbox in the rc file before all else. Thats a real pain when you have 600 rc files and all have groupboxs.

Any more suggestions?

if I remember right, you have to define the group box first and then the other controls in the box

Or
use TRANSPARENT clause while defining the group box.

Harvey,

if I remember right, you have to define the group box first and then the other controls in the box

Harvey,

>The group box is hiding them when transparent. Any thoughts?

I seem to remember some recent discussion about that here. Try searching the forum.

James

James I see what i did wrong. I changed the default rather then just add the ltransparent := .t. on a separate line. Works well but new problems of course. The say for a group box becomes transparent however all gets and say variables surrounded by the group box are not visible until I scroll over a...

Harvey, OK, here is the problem. The preprocessor is passing .f. as lTransparent by default, so the DEAFAULT settings in TSay are never used. Below is the preprocessor output for a test I made. lTransparent is the last parameter. oSay := TSay():New( 2, 2, {|| "&One"}, oDlg,,, .F., .F.,...

set in redifine. Actually both.

Harvey, I note that lTransparent is defaulted in several places in TSay. If you changed the default in the New() method it would not affect the Refine() method. So when you redefine the say (even if just to test the value of lTransparent) it will default to false. Where did you change the default va...

James:

UWE is correct. Changing the ltranslparent to a .t. from a .f. does nothing.

I put a ? ltransparent direclty below the declaration of the ltransparent := .t. in say.prg and it shows up as a .f.
So logic is out on Wednesday.

I'll give it a try this evening.