delphi-xe6

1热度

1回答

我正在阅读tmplayer和MPUI的源代码，这两种媒体播放器都使用MPlayer作为后台在Delphi中播放媒体文件，我在这里注意到以及在其他旧代码中尝试过实验，我不能用 Form1.Rectangle1.Handle 或因为它是在这个例子是想管视频输出在TPanel CmdLine := HomeDir + 'mplayer.exe -slave -identify' +' -wid '

1热度

1回答

这个Delphi代码是什么意思？（从customlistbox例子）

我看着随RAD Studio的XE6的所有例子，当我遇到位于自定义列表框的例子来自于在Object Pascal> FireMonkey桌面> CustomListBox 试图播放用它看看我可以做些什么修改，我决定创建一个for循环来获取每个对象的可见属性或不可见属性。但事情是，我无法理解下面这一行的含义。 107| Item.StylesData['visible.OnChange'] :=

3热度

1回答

如何将TClientDataset更改为另一个TClientDataset？

如何从TClientDataset获得更改？我有一个TClientDataset名为GetDataset，我有一个网格。我想要一个名为ChangeDataset的新TClientDataset中的更改。我该怎么做？

0热度

1回答

是否可以更改Vcl.Forms.TScreen.WorkAreaRect返回的值？

我们开始使用Thinfinity UI在浏览器中虚拟我们的应用程序。虚拟化时，我们应用程序的主窗口最大化为浏览器画布的边界。这意味着，实际上，我们的桌面缩小到浏览器画布的大小。这也意味着，当诸如弹出菜单的控件被定位时，它们经常超出浏览器画布的边界。我相信我们可以解决这个问题，如果我们可以将对Vcl.Forms.TScreen.WorkAreaRect的调用结果设置为浏览器画布的边界。这可能吗？

1热度

1回答

XSuperObject分段错误11 Delphi XE6

我下载了XSuperObject从Web服务器读取Json，但是在将Json字符串添加到ISuperArray的时刻，我收到了Segmentation错误。 JsonResult : string; JsonResult := IdHTTP1.Get('http://.................'); LoadJSONXSuperObject(JsonResult); procedu

6热度

2回答

DLL中的VCL样式正在影响应用程序中的TMenuItem

我正在使用Delphi XE6和VCL样式。我有主应用程序和dll。我的主应用程序启用了运行时主题，并使用了vcl样式文件。我做了和我的DLL很相似的东西。我启用了运行时主题，并在其中添加了VCL.Themes，VCL.Styles和使用VCL样式文件的资源文件。当DLL加载时，我从资源加载VCL样式并将其设置为DLL gui。主应用程序和DLL不是用运行时软件包构建的。现在我有自己的风格和DL

0热度

2回答

Delphi MediaPlayer调整大小

我有一个简单的表单，使用媒体播放器和媒体播放器控件组件加载和播放视频。有没有办法调整播放的视频的大小，在RAD Studio XE6中使用滚动条或类似的东西。

0热度

1回答

LMDMapiSendMail1 - 发送打印屏幕作为附件

“打印屏幕”后，我将图像粘贴到cxImage组件中。如何让LMDMapiSendMail1（来自lmdinnovative）组件发送cxImage的内容作为附件？

1热度

1回答

用下拉菜单按钮TToolbar灰色的

我在得到一个TToolbar按钮的问题出现“启用” 按钮已分配给它的行动 - 它通过OnClick事件它是火还设置了一个下拉菜单，该菜单上有两个选项，两个选项均已启用，并且两个选项均在单击时触发。尽管如此，TToolbar Button仍然保持灰色，但接受点击。有什么建议吗？

-1热度

1回答

从TADOQuery返回一个TList

我希望创建一个使用TADOQuery的函数，并且我可以传递一个select语句，它将依次从数据库中提取结果并将结果作为TList返回 function GetList(SelectStatement : string) : TList; var ResultList : TList; Begin with ADOQuery do Begin close