I have a problem with some very (very very) old foxpro code. The following code I want to run with VFP 9.0 (SP1). When running it will show a small window with some text and a button. When moving over the OK button all the objects on the window will be invisible! When I remove the [*] it shows the text, but there will be no button!
So far I have been unable to solve this Issue! If you have any idea's please let me know!
Hans Peer
The code:
DEFINE WINDOW wrFFMsgSvc ;
FROM 1, 1 ;
TO 10, ;
20 ;
FLOAT ;
SYSTEM ;
TITLE 'Title' ;
COLOR RGB(,,,192,192,192)
ACTIVATE WINDOW wrFFMsgSvc
lcTest = "Test"
@ 1,18 SAY "Test" STYLE "T"
@ 3,0 GET lcTest STYLE "T" FUNCTION [*H ]+ "OK"
READ TIMEOUT 0 CYCLE OBJECT 0 MODAL
RELEASE WINDOW wrFFMsgSvc
-- Hans Peer