小编Ami*_*min的帖子

在Delphi7中,如何检索硬盘唯一的序列号?

嗨,我想检索硬盘唯一(硬件)序列号.我使用了一些功能,但在Windows 7或Vista中,由于管理员权限,它们无法正常工作.是否可以在不以管理员身份运行时检索它?

hardware delphi delphi-7

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

Fireikey Mobile中的双向左语言

如何在Android或iOS中使用FireMonkey显示从右到左的语言(如波斯语或阿拉伯语)中的任何字符串?

我使用Embarcadero Rad Studio XE6(Delphi),当我放入一个TLabel或TEdit并将其文本设置为"سلام"(波斯语中的Hello)一切正常,但在Windows和Mac中,但在移动平台中显示错误,在Android中显示" مالس"并且在iOS中除了空间之外没有显示任何东西.

问题仍存在于Delphi XE7中.

delphi android right-to-left ios firemonkey

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

StrToFloat在我的应用程序中引发错误,而不是在任何应用程序中

我的应用程序是在一个月前在Delphi 7中编写的.现在我想将float str值(如12.5)转换为扩展,但delphi会引发错误.

调试器异常通知

Project Educatee.exe引发异常类EConvertError,消息''12 .5'不是有效的浮点值'.流程停止了.使用"步骤"或"运行"继续.

相同的功能在新应用程序中正常工作

代码只是var x:Extended; 以及X:= strToFloat('12 .5')的任何地方;

delphi delphi-7

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

在主动拨号上的IE中设置Internet代理或在delphi中设置vpn连接

我想用Delphi代码为IE设置代理操作连接.我测试这段代码:

Procedure SetProxy(const Server: String);
var
  Reg : TRegistry;
begin
  Reg := TRegistry.Create;
  Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Internet Settings',False);
  Reg.WriteString('ProxyServer',Server);
  Reg.WriteBool('ProxyEnable',True);
  Reg.CloseKey;
  Reg.Free;
  InternetSetOption(0, INTERNET_OPTION_SETTINGS_CHANGED, 0, 0);
end;
Run Code Online (Sandbox Code Playgroud)

但它改变了IE Internet Option中的LAN设置.

有人有解决方案吗?

附加: 如何检索连接名称列表?

delphi proxy internet-explorer delphi-7 setting

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