Editor Widget in Down Frame

Posted by bfraser4070 on 16-Sep-2019 21:08

Hello:

I have 3 variables.

Variable 1 is a Logical field

Variable 2 is a standard character variable and will contain only 8 characters

Variable 3 is a character field that could contain up to 1,000 characters

I want to display these fields in a down frame.

Here is my code:

define frame b

   err_compl label "Solved"

   err_level label "Level" view-as editor inner-chars 8 inner-lines 1 max-chars 8
   err_message label "Message" view-as editor size 130 by 4
with down size 160 by 50 AT COLUMN 1 ROW 7 frame b.

The 3rd field displays 2 lines on row 1 then I think has scrolled off the rest of the rows.

Attached is what I get.

Help Please,

Thanks.

All Replies

Posted by Matt Gilarde on 17-Sep-2019 11:33

Can you provide a runnable program which demonstrates the issue? I tried to do what you described but the rows all line up as expected for me.

Posted by bfraser4070 on 18-Sep-2019 10:24

Matt - Thanks for responding.   Here is a brief program.   This is a QAD .NetUI installation.   It may be a problem with there methodology/technology.

In Character mode it seems to work ok.  In Desktop mode in QAD is does not.

Thanks,

Bob

define variable yn as logical.

def temp-table edidata

 field err_compl as logical

 field err_level as character

 field err_message as character

.

create edidata.

assign

  err_compl = no

  err_level = "Error"

  err_message = "Record 1 - Is this is a lnong line that I hope will wrap as needed.   If this does not wrap then the data is not long enough.  Please make it longer at least 150 chars.".

  .

create edidata.

assign

  err_compl = no

  err_level = "Error"

  err_message = "Record 2 - Is this is a lnong line that I hope will wrap as needed.   If this does not wrap then the data is not long enough.  Please make it longer at least 150 chars.".

  .

create edidata.

assign

  err_compl = no

  err_level = "Error"

  err_message = "Record 3 - Is this is a lnong line that I hope will wrap as needed.   If this does not wrap then the data is not long enough.  Please make it longer at least 150 chars.".

  .

create edidata.

assign

  err_compl = no

  err_level = "Error"

  err_message = "Record 4 - Is this is a lnong line that I hope will wrap as needed.   If this does not wrap then the data is not long enough.  Please make it longer at least 150 chars.".

  .

define frame b

err_compl label "Solved"

err_level label "Level" view-as editor inner-chars 8 inner-lines 1 max-chars 8

err_message label "Message" view-as editor size 130 by 2

with down size 160 by 50 at column 1 row 7 frame b.

for each edidata:

 display

   err_compl

   err_level

   err_message

with frame b.

down 1 with frame b.

end.

message "Update the variable." update yn.

Posted by Matt Gilarde on 18-Sep-2019 11:13

That example displays correctly for me.

What version of OpenEdge are you using? 32-bit or 64-bit? Can you reproduce the issue outside of QAD in the Procedure Editor?

This thread is closed