小编w5m*_*w5m的帖子

Delphi中的剪贴板操作

本地工作站:Win 7

终端服务器:Win 2008 Server

Outlook:2003在本地工作站上运行.

我正在尝试将Outlook邮件从本地工作站复制和粘贴到终端服务器.

使用下面的代码,我能够将文件从本地工作站复制并粘贴到服务器......

TmyMemoryStream = class(TMemoryStream);

...

procedure TmyMemoryStream.LoadFromIStream(AStream : IStream);
var
  iPos : Int64;
  aStreamStat : TStatStg;
  oOLEStream: TOleStream;
begin
  AStream.Seek(0, STREAM_SEEK_SET, iPos);
  AStream.Stat(aStreamStat, STATFLAG_NONAME);
  oOLEStream := TOLEStream.Create(AStream);
  try
    Self.Clear;
    Self.Position := 0;
    Self.CopyFrom( oOLEStream, aStreamStat.cbSize );
    Self.Position := 0;
  finally
    oOLEStream.Free;
  end;
end;
Run Code Online (Sandbox Code Playgroud)

...但是当我尝试复制并粘贴Outlook邮件时,流大小(aStreamStat.cbSize)为0.我能够获取邮件主题(文件名),但无法读取流内容.

我的代码出了什么问题?

完整的单位代码:

unit Unit1;

interface
uses
  dialogs,
  Windows, ComCtrls, ActiveX, ShlObj, ComObj, StdCtrls, AxCtrls,
  SysUtils, Controls, ShellAPI, Classes, Forms;

type

  {****************************************************************************}

  TMyDataObjectHandler = class;

  PFileDescriptorArray = Array …
Run Code Online (Sandbox Code Playgroud)

windows delphi delphi-2009 terminal-services rds

10
推荐指数
1
解决办法
1630
查看次数

如何验证签名的XML文件签名

我在"普通".NET框架中使用SignedXml类创建了一个文件.它是使用RSA算法签名的.我想在Windows RT应用程序中使用XDocument检查其签名,最好的方法是什么?端口一些加密库还是有其他替代方案吗?

.net c# xml cryptography windows-runtime

10
推荐指数
1
解决办法
1526
查看次数

测试Windows Azure Web应用程序以获得最大的用户负载

我正在对新兴的Web技术进行一些研究,并创建了一个非常简单的Azure网站,该网站使用Web套接字和mongo db作为数据库.我已经设法让所有组件协同工作,现在必须对应用程序执行负载测试.

主要标准是应用程序可以支持的最大用户负载,目前有1个Web角色实例,因此我可能需要测试该实例的最大用户负载,然后尝试使用2个实例,依此类推.

我在网上找到了一些解决方案,比如Loadstorm,但我付不起使用这些服务,所以我需要能够从我自己的开发机器或其他云服务中做到这一点.

我遇到了Visual Studio加载测试,它们看起来非常有用,但它们似乎需要VS Ultimate和一个活动的msdn订阅 - 这里列出了先决条件.此外,从显示负载测试基础知识的视频来看,这些负载测试似乎与实际的Web项目完全分开创建,这是否意味着我只能看到与用户相关的指标?即我看不到正在使用的RAM数量,处理器等.

有什么建议?

load-testing azure visual-studio-2012

9
推荐指数
1
解决办法
5020
查看次数

Laravel / Symfony:无法加载“应用程序”配置文件

升级Homestead并安装软件包后,我遇到了一个奇怪的错误。在调用时php artisan,给出以下内容作为输出:

In LoadConfiguration.php line 68:

Unable to load the "app" configuration file.
Run Code Online (Sandbox Code Playgroud)

少数人建议这是Windows(10)将文件名大写的原因。但是,这在我的文件夹中看不到,也不适用于我的Ubuntu(18.04)环境。

查看源代码,LoadConfiguration.php我们可以看到它正在使用组件中的Findersymfony/finder

foreach (Finder::create()->files()->name('*.php')->in($configPath) as $file) {
    $directory = $this->getNestedDirectory($file, $configPath);

    $files[$directory.basename($file->getRealPath(), '.php')] = $file->getRealPath();
}
Run Code Online (Sandbox Code Playgroud)

问题是查找程序确实返回了某种无法找到我的配置文件的迭代器。一个简单的scandir($configPath)返回所有文件:

.
..
app.php
and all other files
Run Code Online (Sandbox Code Playgroud)

将调用包装起来将iterator_to_array()返回一个空数组[]

通过添加返回以下对象..->in($configPath)->getIterator()

Symfony\Component\Finder\Iterator\PathFilterIterator {#47
  #matchRegexps: []
  #noMatchRegexps: array:2 [
    0 => "#(^|/)\..+(/|$)#"
    1 => "#(^|/)\..+(/|$)#"
  ]
  innerIterator: Symfony\Component\Finder\Iterator\FilenameFilterIterator {#43
    #matchRegexps: array:1 [
      0 => "#^(?=[^\.])[^/]*\.php$#" …
Run Code Online (Sandbox Code Playgroud)

php symfony laravel homestead

9
推荐指数
1
解决办法
517
查看次数

使用CodeIgniter + PDO + SQL Server包含"select"字时,数据保存两次

我有一个CodeIgniter应用程序和SQL Server数据库.我正在使用PDO作为驱动程序,一切正常,但是当我试图保存包含单词"select"或"selection"的数据时.

例:

$data = array();
$data[] = array('title' => 'all you neeed', 'description' => 'description here');
$data[] = array('title' => 'try this selection', 'description' => 'description here');

$this->db->insert_batch($this->table, $data);
Run Code Online (Sandbox Code Playgroud)

php sql-server pdo codeigniter

8
推荐指数
1
解决办法
325
查看次数

将SimpleXML转换为DOMDocument,而不是DOMElement

我需要将一个SimpleXML对象转换为a DOMDocument,以便与之一起使用DOMXPath.我需要DOMXPath以便我可以使用它的registerPHPFunctions方法.可以这样做吗?

随着dom_import_simplexml我得到了DOMElement,而不是DOMDocument.

php xml dom simplexml

7
推荐指数
1
解决办法
6802
查看次数

在Delphi中使用REST请求

我需要在Delphi中编写一个简单的REST服务器,在Ruby on Rails中编写一个客户端.我已经观看了Marco Cantu关于Delphi中REST的所有视频,我有一个问题:

Delphi如何处理请求,例如用户的ID "/users/1"在哪里1

我见过的所有例子都使用简单的函数(比如EchoString(value)ReverseString(Value)),请求是"Datasnap/rest/ClassName/EchoString/Value",但我需要一个像"Datasnap/rest/classname/123".

例如:TContractsCollection是合约的集合,我想查看合同ID=324556.所以在浏览器中(以及在RoR客户端中)它将是(例如):

"http://localhost:3000/DataSnap/rest/TContractsCollection/324556"
Run Code Online (Sandbox Code Playgroud)

但德尔福写道:

"TContractsCollection method not found in the server method list"

有任何想法吗?

delphi rest

7
推荐指数
1
解决办法
2889
查看次数

通过代理在Linux中通过SSH客户端连接到主机

我真的很挣扎.

我的主机(A)位于代理/防火墙(PF)后面,需要连接到主机H.

代理已配置HTTP/FTP/SOCK代理,我在Web浏览器,wget等中配置没有问题.

但是当我用...时

ssh H //to connect my host 
Run Code Online (Sandbox Code Playgroud)

我没有成功通过代理.它似乎试图直接连接而不是通过PF.

我正在使用Ubuntu 12.10.

linux ssh proxy ubuntu-12.10

7
推荐指数
2
解决办法
2万
查看次数

dcomcnfg以编程方式运行

我可以找到各种关于如何为DCOM编程的东西,但实际上没有关于如何以编程方式设置/检查安全性的内容.

我不是要重新创建dcomcnfg,但如果我知道如何在C#(首选或VB.net)中重现dcomcnfg的所有功能,那么我的目标就在眼前.

我似乎无法在此找到任何好的资源,没有开源API或甚至是如何执行每个步骤的快速示例.即使在这里,DCOM或dcomcnfg也没有返回任何结果,也没有关于如何设置/验证/列出安全性的结果.

如果有人对开放API或某些示例有一些指示,我将不胜感激.

.net c# security permissions dcom

6
推荐指数
2
解决办法
9299
查看次数

Variant的内容类型的字符串表示?

首先,为我的英语道歉,我希望我在这里写的是有道理的.现在我的问题.

如何使用TypInfo.GetEnumName()获取Variant 的内容类型的字符串表示形式.我试过以下,没有运气,我得到一个数字表示.

myString := GetEnumName( TypeInfo(TVarType), TVarData(myVar).VType );
Run Code Online (Sandbox Code Playgroud)

谢谢.

delphi rtti delphi-2009 typeinfo

6
推荐指数
1
解决办法
5740
查看次数