我正在创建一个远程文件管理器。服务器端应用程序获取计算机中的驱动程序、目录和文件列表,将其保存为流并在我所在的当前计算机中发送给我。一切正常。
在当前计算机中,首先我使用“OnCreate”事件用外壳图标(来自同一台当前计算机)填充 TListImage 并将其与将显示文件列表的 ListView 链接。因此,一旦收到列表,我就使用下面的这个函数在 ListView 中显示通用文件图标:
function GetGenericFileIconIndex(Filename: string): Integer;
var
FInfo: TSHFileInfo;
begin
Result := -1;
if (SHGetFileInfo(PChar(Filename), FILE_ATTRIBUTE_NORMAL, FInfo, SizeOf(FInfo),
SHGFI_SYSICONINDEX or SHGFI_USEFILEATTRIBUTES) <> 0) then
Result := FInfo.iIcon;
end;
for I := 0 to Pred(List.Count) do
begin
Item := ListView.Items.Add;
Item.ImageIndex := GetGenericFileIconIndex(List[I]);
Item.Caption := List[I];
end;
Run Code Online (Sandbox Code Playgroud)
使用文件名/扩展名,即使在不同的计算机中,我也可以获得正确的外壳图标。但我还需要显示正确的驱动器类型图标。例如,远程计算机上的“D:\”是本地固定驱动器,而当前计算机上的“D:\”是CD/DVD驱动器,因此我无法使用驱动器号来获取此图标。我需要一种从远程计算机(固定驱动器)获取“通用”驱动器类型图标索引并将其发送到当前计算机的方法。
例如,我的目标是获得一个默认的图标为一个本地硬盘跳水,一次默认图标为远程磁盘,CD / DVD设备等等...
抱歉有错误,英语不是我的母语。我尽力解释。
也许我需要的是不可能的,请告诉我...
谢谢!
我有一个png我想在TBitmap32中加载.
加载位图后,我调用:
Bitmap.DrawMode := dmTransparent;
Bitmap.OuterColor := Bitmap.PixelS[0,0];
Run Code Online (Sandbox Code Playgroud)
但是所有白色像素都是透明的.我怎么能只为png图像的透明部分做到这一点?这是我的图像,以标准方式指示图像边缘周围的Alpha透明度.
这是实际的图像:
如果 DLL 已经签名而无需重新编译,我是否可以使用新证书(使用 Microsoft 的 SignTool)安全地签名 DLL 文件?
在我这样做之后,一切看起来都很洁净,但我想 100% 确定。
我是新手,我正在为我的项目做这件事.我能够成功安装和监控nagios.但是我需要将这些数据导出到csv中.任何人都可以帮助我吗?
非常感谢xx
我下面就MongoDB的网站上给出的例子在这里,但我试图导入样本数据时遇到了麻烦。
运行命令时
mongoimport --db test --collection restaurants --drop --file primer-dataset.json
Run Code Online (Sandbox Code Playgroud)
我得到错误:
失败:打开底漆数据集.json:系统找不到指定的文件
问题是,我不确定MongoDB希望该文件位于哪个目录中。我尝试将其放置在data / db中,但这没有用。请注意,我仅使用默认设置。
我知道这是一个微不足道的问题,问这个问题我很愚蠢,但我在任何地方都找不到有关此问题的文档。MongoDB在哪里期望导入文件?
我正在尝试计算文本中单词对出现的Log Likelihood得分,并且在我的Delphi实现中得到了相同的异常结果,我从在线发现的Java和Python源代码中得到了这些结果.1993年在这个来源上发表的Ted Dunning给出了一对特定的结果:
并给出所需的结果为270.72
Dunning还在http://tdunning.blogspot.co.uk/2008/03/surprise-and-coincidence.html中给出了一个实现.
计算对数似然比得分(也称为G2)非常简单,
LLR = 2 sum(k) (H(k) - H(rowSums(k)) - H(colSums(k)))
其中H是香农熵,计算为和的总和(k_ij / sum(k)) log (k_ij / sum(k)).在R中,此函数定义为H = function(k) {N = sum(k) ; return (sum(k/N * log(k/N + (k==0)))}
但我不知道R并且不确定如何将其转换为Pascal.
我的翻译尝试包括这些功能
function LnOK(x : integer): extended;
begin
if x<=0 then Result :=0
else Result := Ln(x);
end;
function Entropy2(a, b: Integer): extended;
begin
Result := LnOK(a + b) - LnOK(a) - LnOK(b); …Run Code Online (Sandbox Code Playgroud) 我有一个名为的集合docCollection,我想执行正常的AQL查询,例如:
FOR id IN docCollection FILTER id.center == "Germany" RETURN id
Run Code Online (Sandbox Code Playgroud)
我试图使用这里所述的例子:
https://docs.arangodb.com/cookbook/JavaDriverXmlData.html
但它对我没有用,它告诉我
线程"main"java.lang.NullPointerException中的异常
我想ImageList1将vtTest组件中的图像显示为叠加层.
我已经在互联网上找到了很多资源,而且在这里 - 就像这样 - 但我不能让它们都没有正常工作.
我确定我错过了一些非常微不足道的东西,但我无法弄清楚它可能是什么.
我得到了什么:
我想要的是: 
这是包含显示我的问题的基本示例的表单.
Unit1.pas
unit Unit1;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, VirtualTrees, Vcl.ImgList;
type
PMyVtTestData = ^TMyVtTestData;
TMyVtTestData = record
isLocked: Boolean;
end;
TForm1 = class(TForm)
vtTest: TVirtualStringTree;
ImageList1: TImageList;
procedure FormCreate(Sender: TObject);
procedure vtTestGetImageIndex(Sender: TBaseVirtualTree; Node: PVirtualNode;
Kind: TVTImageKind; Column: TColumnIndex; var Ghosted: Boolean;
var ImageIndex: Integer);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: …Run Code Online (Sandbox Code Playgroud) 我正在尝试为 Wordpress 站点构建本机 Android 应用程序。我正在使用 WP REST API v2 ( https://wordpress.org/plugins/rest-api/ ) 来获取帖子和其他必需的属性。我需要对用户进行身份验证,为此我使用了 JWT 身份验证 for WP REST API ( https://wordpress.org/plugins/jwt-authentication-for-wp-rest-api/ ) API 来生成和验证令牌工作正常。但是,当我尝试在标头中传递生成的令牌时,我不断收到以下错误。
{
"code": "jwt_auth_bad_config",
"message": "JWT is not configurated properly, please contact the admin",
"data": {
"status": 403
}
}
Run Code Online (Sandbox Code Playgroud)
关于出了什么问题的任何建议?请求帮助让这个东西运行。
我有一个循环可以执行我想要的操作 - 它将类型的对象添加A到列表中results:
ArrayList<A> results = new ArrayList<>();
for (A a: listOfA) {
for (B b : a.getListOfB()) {
if ("myString".equals(b.getMyString())) {
results.add(a);
}
}
}
Run Code Online (Sandbox Code Playgroud)
现在我想使用 Java 8 流重构我的代码,我想出了这个解决方案,因为它收集类型B而不是A-的对象List<A> results = ...显然是错误的:
List<A> results = listOfA.stream()
.flatMap(a -> a.getListOfB().stream())
.filter(b -> "myString".equals(b.getMyString()))
.collect(Collectors.toList());
Run Code Online (Sandbox Code Playgroud)
A如何使用 Java 8 流收集类型列表?
我在寻找[java] 嵌套 foreach 流的SO 中找到了许多结果,但我找不到任何适合我需要的东西。