@ SAY

[rhlawek]

I have an issue with @ SAY that I don't quite understand. Using it is not too difficult, and I get it to update and show on the screen without issue, which is controlled by navigation through and xbrowse. The problem I have is that each time the text is changed and the screen gets refreshed, text previously displayed is just overlayed with the updated text. How do I clear previously written text so it doesn't just overlay but instead clears the defined region the only displays the updated text?

Robb

[Antonio Linares]

Robb,

oSay:SetText( "new text" )

The Method SetText() is implemented in Class TWindow so it can be used on dialogs and most controls

[rhlawek]

Antonio,

I sent you an email with a small screen shot of what I see. I am using SayText() to update the text, it is the clearing of previously written text that is eluding me.

Robb

[James Bott]

If I remember correctly, the new text has to be longer than the old text--if needed add spaces.

James

[James Bott]

I just remembered that I usually use something like:

padr(cNewText,30)

Substitute 30 with whatever your maximum length is.

[Antonio Linares]

Robb,

This example seems to work fine here: (right click on the dialog to change the text)

Code: Select all  Expand view

#include "FiveWin.ch"

function Main()

   local oDlg

   SetDlgGradient( { { 1, RGB( 199, 216, 237 ), RGB( 237, 242, 248 ) } } )

   DEFINE DIALOG oDlg

   @ 1, 1 SAY oSay PROMPT "Hello" OF oDlg

   ACTIVATE DIALOG oDlg CENTERED ;
      ON CLICK oSay:SetText( "bye" )

return nil