Hi everyone,
can someone suggest how to change look for text in display mode? In before.choice of choice.text.manager the attr.textmode is set to 1 if the text can't be modified, but it would be nicer to change the window's look, too.
attr.textzoomsession$ could be used or not? I'd like to define a new window type (e.g. with a cyanus background colour) and then display it.
What do you think?

Thanks

Benini,

Please fill up your profile with the BaaN version etc.

You can use text.edit() (http://www.baanboard.com/programmers_manual_baanerp_help_functions_text_fields_text_edit) and text.window() (http://www.baanboard.com/programmers_manual_baanerp_help_functions_text_fields_text_window)

I would not recommend that every user should be allowed to create their own text windows. Here is another example, where the user is allowed to zoom the text window session and then pick the one they like to use/view.

|******************************************************************************
function extern long put.def.mig.text()
{
long fp
string temp.file(256)

temp.file = creat.tmp.file$(bse.tmp.dir$())
fp = seq.open(temp.file,"w")
if fp < 1 then
dal.set.error.message("zmmigs0006") |* File Handling Errors
return(DALHOOKERROR)
endif
e = seq.puts("Migration Request # " & str$(zmmig200.reqid), fp)
e = seq.puts("Description of Change: ", fp)
e = seq.puts("Menus/sessions affected: ", fp)
e = seq.puts("Process Dependencies: ", fp)
e = seq.puts("System test: ", fp)
e = seq.puts("Setup required: ", fp)
e = seq.puts("", fp)
e = seq.puts("Other Systems affected and how: ", fp)
e = seq.close(fp)
txtg = start.session(MODAL,"tttxt1110m000","zmmig1100m000","tttxt0005._index1")
if isspace(txtg) then
dal.set.error.message("zmmigs0005")|* Text group has to be selected
return(DALHOOKERROR)
endif
|* tttxt005.txtg = "text"
e = text.write("zmmig200.note", "", "","","","", tttxt005.txtg, "", temp.file)
e = file.rm(temp.file)
return(0)
}
|******************************************************************************