for Debug i use
- Code: Select all Expand view
- SET ALTER TO "_LOGIT2.TXT"
onDummy("Hello World")
SET ALTER TO
and Function
- Code: Select all Expand view
- FUNCTION onDummy()
LOCAL iMax := PCOUNT()
LOCAL i
LOCAL cText := ""
LOCAL xValue
* IF lDebug = .T.
FOR i := 1 TO iMax - 1
cText += Var2Char( PValue( i ) ) + CHR( 9 )
NEXT
cText += Var2Char( PValue( iMax ) )
SET CONSOLE OFF
SET ALTER ON
? cText
SET ALTER OFF
SET CONSOLE ON
* ENDIF
RETURN NIL
but when call onDummy() under FiveWin i got a
- Code: Select all Expand view
- Messagebox(cText, "Alert")
and nothing is redirect to _LOGIT2.TXT
so how under FiveWin