问题标签 [tms]

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 回答
456 浏览

delphi - 在 TadvMemo 中选择列

是否可以在 TadvMemo 组件中选择列文本区域?就像在 Delphi IDE 中按住鼠标左键和 ALT 键选择文本一样。

0 投票
4 回答
2771 浏览

delphi - 独立的移动应用程序:RadPhp 或 Delphi IntraWeb

我计划编写一个主要由移动设备用户(iPhone、iPad、Android、Windows 和诺基亚)使用的应用程序。该应用程序将是一个独立的应用程序(即不从服务器运行)。

该应用程序将不时需要从服务器(FTP 或 HTTP)获取新的费率。

将来我可能会扩展该服务,以便用户可以登录到 Web 应用程序,以便他们可以在桌面上访问他们的记录并在他们的移动设备上同步。

我曾使用过 Delphi 和 PHP,但从未使用过 Delphi IntraWeb 和 RadPHP。

我了解对于不同的界面,我可能需要不同的 UI 设置。我的主要目标是轻松管理软件,尤其是当它在许多移动设备和桌面上得到支持时。

RadPHP 支持 PhoneGap,据我所知,我只能将它用于 iPhone 和 Android。使用 IntraWeb,我最近遇到了“TMS IntraWeb iPhone Controls Pack”,http: //www.tmssoftware.com/site/tmsiwiphone.asp,它看起来很有希望。

那么你会为我推荐哪条路?带有 TMS 的 IntraWeb 或带有 PhoneGap 的 RadPHP?或者我在这里完全错过了什么?

提前致谢。迈克尔

0 投票
1 回答
344 浏览

delphi - 向 TMS 控件“TAdvSmoothDock”添加新属性,但它没有出现在对象检查器中

我正在尝试向 TMS 控件“TAdvSmoothDock”添加一个新属性(图像:TImageList),但该属性未出现在对象检查器中

我在“已发布”下将其定义如下:

我可以编译它,但该属性没有出现在对象检查器中。在代码中使用控件时,它确实出现在 delphi IDE 中:

喜欢 :

目前我正在使用 Delphi XE2 VCL。

问候。

0 投票
1 回答
472 浏览

prolog - 真相维护系统的 Prolog 实现

真相维护系统 (TMS) 存储在给定知识库中导致特定结论的推理的理由。

一个很好的例子看起来像这样(这不是序言):

我根本无法弄清楚如何实现这一点。我不知道如何具体表示模态运算符M(符合)。显然,我可以创建谓词 good_student/1、study_hard/1 和 party_person/1。study_hard/1 到 good_student 和 ¬study_hard 的链接也是我迷路的地方。

这引出了我的问题:有人知道如何在 prolog 中实现类似的东西吗?

提前致谢。

0 投票
1 回答
1314 浏览

delphi - 移动面板的动画/重绘闪烁严重 - 建议?

当我对应用程序中的某些组件进行“动画处理”时,希望你们中的一些人能够指出我处理闪烁/撕裂/重绘问题的正确方向。

我必须先说“动画”在不处于全屏模式时似乎可以正常工作(没有闪烁等) - 即 1024*768,borderstyle=bsSingle。当应用程序接管完整的监视器并且边框样式变为 bsNone 时,此问题变得更加明显。

有2个“动画”:

1 - 使用 Winapi AnimateWindow 方法从左到右滚动面板

2 - TmsAdvPolyPager 逐步浏览其每一项并随后显示其“页面”

滚动面板时,“退出”的面板会留下“轨迹”,动画似乎在颤抖,不再流畅。

单步执行 TmsAdvPolyPager 项时,下一项有时不会突出显示,并且它显示的页面通常具有上一个面板的“残差”。

两个动画都由计时器触发 - AnimateWindow 在它自己的线程中,而 PolyPager 步进不是。

所以,基本上 - 关于如何平滑这些动画并强制正确重绘 TmsAdvPolyPager 组件的任何想法?第一次尝试这种东西,所以不完全确定要研究什么。

一如既往,非常感谢您的帮助!

0 投票
1 回答
793 浏览

tms - 如何使用 TMS Flexcel 向 Excel 单元格添加超链接

我正在使用 TMS Flexcel 创建一个 Excel 文件。我有一个主工作表,列出了工作簿中的所有工作表。在主工作表上,我想添加带有指向所有其他工作表的链接的文本。

我有以下代码创建一个超链接并将其添加到 excel 文件中。

因此,一旦我添加了超链接,我就无法弄清楚如何将它添加到主工作表中的单元格中。我尝试了以下方法,但它不起作用:

单元格 B2 中的上述输出是:“FlexCel.Core.THyperLink”

0 投票
1 回答
2257 浏览

delphi - Delphi XE3:TMS 软件的 TWebUpdate:不替换主 exe 文件

更新我的应用程序我正在使用 TMS 软件的 TWebUpdate:

这是 update.info 文件:

实际上,更新工作正常(下载 exe 文件并重新启动应用程序),但 exe 文件没有被下载的文件替换。哪里可能有问题?提前致谢。

0 投票
1 回答
1694 浏览

delphi - 在关闭 PageMode 的情况下在 TDBAdvGrid 中查找记录

我正在拼命地尝试在其 PK 与 TDBAdvGrid 中的第 0 列相关联的记录上进行定位。我拥有的 TMS 组件包版本是 6.8.something。我在带有 Delphi XE 1 的 Win7x64 中使用它。 PageMode 已关闭,因为我需要在客户端级别进行排序和分组(目前没有后端数据库,只有处于离线模式的客户端数据集)。

我的定位代码是这样的:

但它不起作用,因为 ItemIDStr 总是返回一个空字符串。我现在真的很缺乏想法。

建议?

谢谢!

0 投票
1 回答
1139 浏览

delphi - DB 网格上的滚动条 - 寻求明确的方法

我看到很多 DB 滚动条问题,但似乎从未找到明确的答案。

没有选项(属性)可以单独或联合添加/隐藏 DB 网格滚动条。只需在需要时自动出现。

如果我没有足够的行来滚动,我希望我的列填满整个网格。

如果我这样设计,那么当在运行时添加垂直滚动条时,也会自动添加水平滚动条(因为我刚刚用垂直滚动条覆盖了最右侧列的右侧部分,我们现在需要一个水平滚动条酒吧看看我在报道什么)。

一种选择是设计我的网格,以便在右手尺寸(多少像素?)处有足够的空间来容纳垂直滚动,但这很不雅观,直到有足够的行来触发滚动条(如果有的话)。

在我看来,最美观的方式是从一个网格开始,该网格填充了 X 像素宽的列,并将其宽度增加到 X + width of vertical scroll bar(或将一个/一些网格列的宽度总共减小0 width of vertical scroll bar)添加新行时的像素会导致出现垂直滚动条。

我错过了什么吗?有没有“正确”的方式来做到这一点,或者行业标准的方式(我不是要“最好”的方式或任何过于主观的方式,所以请不要关闭。我相信很多人需要知道这一点)。

标准中有什么TDBgrid可以促进这一点吗?

奖励:我订阅了 TMS 组件,所以如果有一种方法可以简单地使用 来做到这一点TAdvDbgrid,那对我来说没问题,但是一个通用的解决方案TDBgrid就可以了。

非主观问题:鉴于
- 我不想增加我的宽度TDBgrid
- 并且我不想在没有垂直滚动条的情况下在右侧出现一个空白的白色列
- 并且我愿意减少我最右边的列,以避免出现垂直滚动条时出现水平滚动条
......我该怎么做?


[更新] Ken 获得了正确的答案,因为他的解决方案最适合大多数用户。

对于像我这样已经为 TMS 订阅付费的人,我只是注意到他们的TDbAdvgrid组件有一个 ScrollBars 属性,当我将它设置为 时ssVertical,它会执行我想要的操作。

现在,如果我只能找到一种固定标题行的好方法,当它是唯一的行时......

0 投票
1 回答
2322 浏览

networking - 1个处理管道,2个同类型IO源

在我GHC Haskell使用 stm、network-conduit 和管道的应用程序中,每个套接字都有一个链,它使用runTCPServer. Strands 可以通过使用广播 TChan 与其他 strands 进行通信。

这展示了我想如何设置管道“链”:

在此处输入图像描述

所以,我们这里有两个源(每个都绑定到辅助管道),它们产生一个Packet对象,该对象encoder将接受并变成ByteString,然后发出套接字。我在两个输入的有效融合(性能是一个问题)方面遇到了很大的困难。

如果有人能指出我正确的方向,我将不胜感激。


由于我不尝试就发布这个问题是不礼貌的,所以我将把我之前尝试过的内容放在这里;

我已经编写/挑选了一个函数,该函数(阻塞)从 TMChan(可关闭通道)产生 Source;

同样,将 Chan 转换为 sink 的函数;

那么mergeSources 就很简单了;fork 2 个线程(我真的不想这样做,但到底是什么),可以将他们的新项目放入一个列表中,然后我会生成一个列表;

虽然我成功地对这些函数进行了类型检查,但我没有成功地利用这些函数进行类型检查;

无论如何,我认为这种方法存在缺陷——有许多中间列表和转换。这对性能不利。寻求指导。


PS。据我所知,这不是重复的;将具有多个输入的管道融合在一起,因为在我的情况下,两个源都产生相同的类型,我不在乎从哪个源产生Packet对象,只要我不等待一个而另一个有准备使用的对象。

聚苯乙烯。对于示例代码中 Lens 的使用(以及知识要求),我深表歉意。