问题标签 [progress-4gl]

For questions regarding programming in ECMAScript (JavaScript/JS) and its various dialects/implementations (excluding ActionScript). Note JavaScript is NOT the same as Java! Please include all relevant tags on your question; e.g., [node.js], [jquery], [json], [reactjs], [angular], [ember.js], [vue.js], [typescript], [svelte], etc.

0 投票
1 回答
1266 浏览

dynamic - 动态操作菜单以在正在进行的 Windows 应用程序中创建 MRU

我有一个正在编写的 Windows 应用程序。我正在使用 10.1C 版本。我想在菜单中添加 MRU 功能,即我想在应用程序的文件菜单中添加、删除和修改菜单项,以按使用顺序显示用户最近的文件。我已经在许多其他语言中经常这样做了,这是一个非常常见的功能并且很容易做到。

但是如何在进行中做到这一点呢?在另一种语言中,我可以创建 10 个菜单项并简单地使未使用的菜单项不可见,但您不能在 Progress 中执行此操作。我无法想象为什么。

或者,我应该能够根据需要动态创建菜单项并将它们添加到文件菜单中 MRU 列表的末尾,但我似乎也不能这样做:首先,我无法指定文件菜单中的位置该项目必须添加,它总是将其添加到底部,其次,我无法将动态菜单添加到静态菜单,因此我无法将我的 MRU 菜单添加到现有的文件菜单中。如果我使整个文件菜单动态化(我真的不想这样做),我可以做到这一点,但是我不能将动态文件菜单添加到静态菜单栏。这给我留下了使整个菜单结构动态化的不可接受的选择。

有人有什么想法吗?



使用下面的 Ade 回答,这里是我如何实现它的一个简短示例。更改 MRU 项目的标签和值不需要任何摆弄,只需设置适当的属性,但为了添加新的 MRU 项目,我必须删除并重新创建退出菜单项:

实际的 MRU 项目的创建与此处创建的退出菜单一样,只是我将句柄存储在临时表中。

结果是这样的菜单:

0 投票
1 回答
2713 浏览

menu - 如何以编程方式操作正在进行中的多个动态小部件上的弹出菜单

语言:进度 10.1C

我有一个 Windows 窗体,并在其上动态创建了许多小部件(在本例中为切换框)。我可以创建从 0 到 64 个小部件,具体取决于用户在当前集合中有多少个 do-hickies。当用户从一个集合更改为另一个集合时,将根据需要删除或创建小部件。表单将根据显示的小部件数量调整大小。

用户可以通过从菜单栏、工具栏或键盘快捷键中选择操作来检查其中的任意数量并在选中的项目上执行某些过程。但我也希望用户能够右键单击单个小部件,它应该会弹出一个弹出菜单,其中包含可以仅对单击的项目执行的操作,无论它是否被选中。

就其本身而言,这非常简单。过去,我通过在用户单击任何一个动态控件时弹出一个弹出菜单来完成这种事情(在其他语言中)。但是我很难在进行中做这个简单的事情:

我无法有一个弹出菜单来响应所有小部件的右键单击。我尝试创建一个弹出菜单,然后在创建每个动态小部件时,将其 popup-menu 属性设置为此菜单。问题是菜单只能应用于一个小部件。将其分配给 Widget1 后,我无法将其分配给 Widget2。这导致人们想到为每个小部件创建一个单独但相同的菜单。随着小部件被销毁和重新创建,这些菜单也将被销毁。在单个会话中,我将创建和销毁数百甚至数千个相同的菜单,而用户可能会使用其中一个或两次。或者根本没有。所以这对我来说似乎不是一个好的选择。

我的下一个解决方案是创建一个可以以编程方式弹出的菜单,但是所有以编程方式弹出菜单的尝试都失败了。我曾尝试将“MENU-DROP”应用到 MENU MyMenu 和其他类似的东西,但我终其一生都无法弄清楚如何去做。我也发现很难搜索这方面的信息。好像没有其他人曾经尝试过这个,并且在极少数情况下有人问过它,但没有令人满意的答案。我怀疑这是做不到的。

在尝试所有这些事情的同时,我也遇到了关于鼠标-菜单-向下、鼠标-菜单-向上和鼠标-菜单-点击的无穷无尽的问题。MOUSE-MENU-CLICK 似乎永远不会发生,无论如何我的动态小部件都不会发生。我无法弄清楚为什么。MOUSE-MENU-UP 有时会发生,但这取决于 MOUSE-MENU-DOWN 和小部件的其他事件以及小部件的父级中发生的情况。我无法准确地确定它何时会或不会触发,这非常违反直觉。MOUSE-MENU-DOWN 是我唯一可以指望开火的。

所以:我不能以编程方式显示菜单,我只能通过右键单击菜单的父级来显示它。避免拥有数百个相同菜单的唯一方法是在小部件的父级上有一个弹出菜单,例如默认框架。

使用默认框架上的静态弹出菜单,我可以右键单击小部件,菜单会出现,但如果我单击框架中的任何位置,它就会出现。我可以禁用菜单,然后在小部件的右键单击事件中启用它。这第一次效果很好;如果我单击框架中的任何位置,则不会发生任何事情(菜单已禁用),但如果我单击我的小部件,则菜单已启用并弹出。耶!但是现在菜单已启用,如果我右键单击任何位置、按钮、空白区域、进度条等,它就会弹出。我什么时候再次禁用它?菜单弹出后,用户可以单击任意位置,菜单将消失。菜单关闭时不会触发任何事件,所以我被卡住了。

抱歉,冗长的杂乱无章,我将简要地重申这个问题:我想要一个弹出菜单,当用户右键单击多个动态创建的小部件之一时弹出菜单。


使用汤姆的回答,这就是我实现它的方式:

0 投票
1 回答
3473 浏览

progress-4gl - 从浏览和创建临时表中获取值

我有一个动态浏览器。它将根据通过 UI 给出的一些输入动态填充值。

现在我想获取该浏览中显示的值并为此制作一个临时表。请帮忙

0 投票
1 回答
2776 浏览

progress-4gl - 如何使用动态查询创建临时表

现在我需要为此查询创建一个临时表。如何创作?

如果我使用类似创建的方法,我应该传入什么值?

0 投票
2 回答
3231 浏览

progress-4gl - 将临时表值写入 .csv 文件

我们已经动态创建了一个临时表。我们想将完整的表格放入 .csv 文件中。怎么做?

0 投票
1 回答
2283 浏览

progress-4gl - 输出具有动态位置值/文件名的流?

如何将流输出到动态的位置..

对于静态获取位置可以使用

将流 s1 输出到“D:\reports1.txt”。

但是如果我想从屏幕上获取价值,怎么办?

0 投票
1 回答
3113 浏览

progress-4gl - 从动态缓冲区创建动态临时表

这是我的问题:

hBuffer 是我的缓冲区句柄。

我想从这个 hBuffer.How 创建一个临时表?请帮助

0 投票
1 回答
2770 浏览

progress-4gl - 从临时表中填充浏览器中的数据?

我已经创建了一个动态临时表和动态查询。现在我想将它填充到浏览中。这是我的代码。我的问题是它显示错误,例如“缓冲区复制语句的源元素没有记录(5365)” . 这个怎么解决?cip-tablename = 从 UI 获取的 tableName

0 投票
1 回答
1008 浏览

progress-4gl - Openedge 11 Microsoft SQL Server 数据服务器性能

我们正处于从 Progress DB 迁移到使用 Dataserver 到 SQL Server 数据库的过程中,我们遇到了很多问题,特别是数据服务器无法为大量查询生成服务器端连接的性能问题。

在 Openedge 11 的数据表中,它说这已经得到改进,但任何人都知道他们做了多少改进。

例如,每个涉及两个缓冲区的查询,其中第二个是 FIRST/LAST 不会在服务器端加入,这是否已更改?

非常感谢,

0 投票
3 回答
1555 浏览

progress-4gl - OpenEdge ABL / Progress 4GL 查询

我需要帮助编写这个进度查询:首先找到一个无锁,其中 aa = variable and ab = variable2 and ac = variable3 and ((ad <> variable4 and ae <> variable5 and af <> variable6) /* this "or in " 只是 sudecode 我想要它做的事情 */ 或 (first b no-lock where ba = variable and (bb = variable7 or bb = variable8 no-error))) no-error.`

“或在”是我遇到的麻烦。