In the CREATE event of the ZOOM window add the following procedural event handler.

if len(CreateParam) then
.eb_Text->TEXTVAL = CreateParam
end
return 0

The code sample above:

Checks to see if data (the CreateParam) has been passed to the ZOOM window on the CREATE event.

If it has, then (using shorthand notation) assign the CreateParam to the edit box's TEXTVAL property. This is the same as the TEXT property, with the additional step of converting @TM, @SVM, and @VM to carriage return-line feed (Char(13):Char(10)) for Set_Property(), and Char(13):Char(10) to @TM for Get_Property().

  • No labels