如何在用户定义窗口中添加滚动条 [英] How To Add Scroll Bar In user define window

查看:93
本文介绍了如何在用户定义窗口中添加滚动条的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!

问题描述

这是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屋!

查看全文
登录 关闭
扫码关注1秒登录
发送“验证码”获取 | 15天全站免登陆