如何在用户定义窗口中添加滚动条 [英] How To Add Scroll Bar In user define window
问题描述
这是myall winow我需要在所有这个窗口中滚动如何在窗口中添加滚动
定义窗口ap01;
at 0.000,0.000 ;
尺寸30.229,110.000;
title coynm;
font" MS Sans Serif",8;
< span style ="white-space:pre"> style" B" ; $
float;
NOCLOSE;
noMINIMIZE;
填充文件"wsis.sys";
颜色rgb(,,, 192,192,192)
移动窗口ap01中心
************* **********************
定义窗口ap02;
跨度>在&NBSP; 0.000,0.000 ;
尺寸25.691,53.333;
title coynm;
font" MS Sans Serif",8;
< span style ="white-space:pre"> style" B" ; $
float;
noCLOSE;
noMINIMIZE;
填写文件" wsi.sys" ;;
颜色rgb(,,, 192,192,192)
移动窗口ap02中心
************************************ ************************************
ACTI WIND AP01 >
*********************
定义窗口apt1;
跨度>在&NBSP; 0.000,0.000 ;
尺寸15.307,43.333;
title coynm;
font" MS Sans Serif",8;
< span style ="white-space:pre"> style" B" ; $
float;
noCLOSE;
noMINIMIZE;
填写文件" wsi.sys" ;;
颜色rgb(,,, 192,192,192)
移动窗口apt1中心
*******************************
ACTI WIND APT1
$
**************************
我不认为 定义
窗口
支持 滚动。
你可以做的是创建一个带有编辑框的表格,并将控制源分配给没有长度限制的属性或变量
另外,在我的情况下,我将表单命名为
frm,和 sc_editbox 是
然后,运行表单后,可以更新文本
frm.sc_editbox = frm.sc_editbox +" 1" + CHR(13)+" 2"
frm.edit1。 刷新 ()
别忘了刷新每次要在屏幕上刷新值时,编辑框
this is myall winow i nee scroll in all this window how can add scroll in window
define window ap01 ;
at 0.000, 0.000 ;
size 30.229,110.000 ;
title coynm ;
font "MS Sans Serif", 8 ;
style "B" ;
float ;
NOCLOSE ;
noMINIMIZE ;
fill file "wsis.sys";
color rgb(,,,192,192,192)
move window ap01 center
***********************************
define window ap02 ;
at 0.000, 0.000 ;
size 25.691,53.333 ;
title coynm ;
font "MS Sans Serif", 8 ;
style "B" ;
float ;
noCLOSE ;
noMINIMIZE ;
fill file "wsi.sys";
color rgb(,,,192,192,192)
move window ap02 center
************************************************************************
ACTI WIND AP01
*********************
define window apt1 ;
at 0.000, 0.000 ;
size 15.307,43.333 ;
title coynm ;
font "MS Sans Serif", 8 ;
style "B" ;
float ;
noCLOSE ;
noMINIMIZE ;
fill file "wsi.sys";
color rgb(,,,192,192,192)
move window apt1 center
*******************************
ACTI WIND APT1
**************************
I don't think define window support scroll.
What you can do is to create a form with an edit box, and assign the control-source to a property or variable with no length limit
Also, in my case am naming the form as frm, and sc_editbox is a property in the form
Then, once you run the form, you can update the text
frm.sc_editbox = frm.sc_editbox + "1" + CHR(13) + "2"
frm.edit1.Refresh()
don't forget to refresh the editbox every time you want refresh your values on the screen
这篇关于如何在用户定义窗口中添加滚动条的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!