小编Mic*_*ter的帖子

如何在不使用 Indy 组件的情况下在 Delphi 10.1 中 ping 一个 IP 地址?

如何在不使用 Indy 组件的情况下在 Delphi 10.1 中 ping 一个 IP 地址(或按服务器名称)?TIdICMPClient 使用提升的权限工作,但我想以普通用户的身份进行。

delphi ping icmp

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

修复“断开连接”的 Windows 驱动器映射

有时网络驱动器已经映射到驱动器号,因为“断开连接”。使用正常的 Windows 功能访问该驱动器上的文件/文件夹失败。一旦用户在 Windows 资源管理器对话框中手动单击该驱动器,它就会被神奇地修复。

由于我的程序是一个批处理程序,我想从我的程序(C++)开始这个“魔法”,但我还没有找到一个 Windows 函数。通常的 WNet 中没有任何东西......功能......

c++ windows networking batch-file disconnected

5
推荐指数
0
解决办法
1802
查看次数

Delphi:获取调用者函数的UnitName

unit MyFirstUnit;\n  uses MyTranslateUnit;\n  ...\n  sText := Dictionary('text to translate', UnitName);\n  ...\nend.\n
Run Code Online (Sandbox Code Playgroud)\n\n

\xc2\xa0

\n\n
unit AnotherUnit;\n  uses MyTranslateUnit;\n  ...\n  sText := Dictionary('new text to translate', UnitName);\n  ...\nend.\n
Run Code Online (Sandbox Code Playgroud)\n\n

\xc2\xa0

\n\n
unit MyTranslateUnit;\n  function Dictionary(sTextToTranslate: string; sUnitName: string)\n  begin\n    // Here I need the UnitName of the caller\n    Result := ...\n  end;\nend.\n
Run Code Online (Sandbox Code Playgroud)\n\n

我的程序中有很多地方调用Dictionary(...)。如何避免将 UnitName 作为第二个参数传递?
\n是否可以在没有第二个参数的情况下在 MyTranslateUnit 中获取调用者的 UnitName?

\n\n

我想要一个像

\n\n
\n

函数字典(sTextToTranslate:字符串)

\n
\n

delphi

5
推荐指数
1
解决办法
1471
查看次数

TortoiseHg / Mercurial <=> TortoiseGit <=> TortoiseSvn / Subversion的快速比较

以下三个免费的版本管理工具之间有什么区别?对于2-5人的小型项目,哪一个是最好的?您会考虑什么标准?

  • TortoiseSVN /颠覆
  • 乌龟汞/水银
  • TortoiseGit / Git

我知道可以使用命令行实现更多功能-但是在这个问题中,我只想考虑可以使用不使用命令行提供的前端功能/ TortoiseXXX即可访问的功能。
这就是为什么我不认为该问题与Git,Mercurial,SVN重复的原因

git tortoisesvn mercurial tortoisehg tortoisegit

3
推荐指数
1
解决办法
1199
查看次数

Delphi:删除超过 X 天和/或具有特殊文件掩码 (*.xxx) 的目录中的文件

语言: Delphi 10.1 Berlin

问题:
有一个包含测量文件 ( *.csv) 和其他文件的目录。
每隔几个小时就会创建一个新的测量文件。
我需要有可能删除.csv该文件夹中超过特定​​天数的所有文件。不应触及所有其他文件类型。

问题:
Delphi 中是否有任何内置函数来完成这项工作?如果没有,解决这个问题的有效方法是什么?

delphi datetime wildcard delete-file

2
推荐指数
1
解决办法
1968
查看次数

TortoiseHg 冻结挂起崩溃

如果TortoiseHg 不再反应,我该怎么办?

  • 我试图恢复更改的文件
    => 没有任何反应,应用程序冻结,没有消息
  • 我打开了架子并尝试将更改后的文件放入新的架子/垃圾箱
    创建一个新的架子工作,将文件移到架子上没有 :-(
    => 没有任何反应,应用程序冻结,没有消息

在控制台窗口(如果打开...)中有一条消息(只要搁置窗口未打开):

Warte auf Sperre von Arbeitsverzeichnis von C:\... gehalten von ''
Run Code Online (Sandbox Code Playgroud)

意思是

Wait for lock of working directory C:\... held by ''
Run Code Online (Sandbox Code Playgroud)

crash mercurial tortoisehg freeze

0
推荐指数
1
解决办法
509
查看次数